Autofit Columns - Ejemplos de código de VBA

Después de manipular una hoja de trabajo con VBA, puede ser necesario ajustar automáticamente sus columnas para presentar el mejor resultado final posible. A continuación, se explica cómo ajustar automáticamente las columnas con VBA.

Columna de ajuste automático usando VBA

Este código se ajusta automáticamente a las columnas A y B. El ajuste automático se aplica a la hoja activa.

1 Columnas ("A: B"). Columna completa.Ajuste automático

Autoajustar todas las columnas usadas

¿Qué sucede si desea ajustar automáticamente todas las columnas utilizadas en una hoja de trabajo? Utilice el método anterior en combinación con Count the Number of Used Columns y un bucle.

El siguiente código ajusta automáticamente todas las columnas usadas usando VBA:

1234567891011 Sub AutofitAllUsed ()Dim x como enteroPara x = 1 a ActiveSheet.UsedRange.Columns.CountColumnas (x) .EntireColumn.autofitSiguiente xEnd Sub

Va a ayudar al desarrollo del sitio, compartir la página con sus amigos

wave wave wave wave wave