Ajuste la altura y el ancho de la línea automáticamente a través de una macro

Cómo establecer la altura y el ancho de la línea a la altura óptima utilizando una macro.

Cómo ajustar automáticamente la altura de la fila usando una macro

Si desea ajustar la altura de una fila al contenido de las celdas, no hay problema con Excel. Al hacer doble clic en el espacio entre dos líneas, ajusta la altura de la línea superior a una altura con la que se puede mostrar todo el contenido.

Pero, ¿cómo se hace eso con una macro? Utilice el siguiente código de programa:

Ajustar subaltura ()
ActiveSheet.Range ("a1: a10"). Rows.EntireRow.AutoFit
End Sub

Siempre necesita ajustar la altura de las líneas en sus macros cuando almacena tablas usando macros. Especialmente cuando se utilizan saltos de línea en una celda, partes del contenido pueden volverse invisibles rápidamente, como muestra la siguiente figura:

Después de iniciar la macro, las alturas de las líneas 1 a 10 de la tabla activa se establecen en los valores óptimos para que todos los contenidos sean visibles. La siguiente figura muestra el resultado:

Ajuste la referencia "a1: a10" en la macro a los números de línea en los que desea optimizar la altura.

No importa qué nombres de columna use en la impresión, los números de línea son importantes. Por tanto, puede utilizar la expresión "c200: c1000", por ejemplo, para adaptar las líneas 200 a 1000.

Cómo cambiar el ancho de línea usando una macro

Lleva mucho tiempo si desea configurar todas las filas y columnas utilizadas con la altura y el ancho óptimos. Entonces usa esta macro:

Establecer fila de subcolumnas ()
Con ActiveSheet.UsedRange
.Columnas.AutoFit
.Rows.AutoFit
Terminar con
End Sub

La macro ajusta todas las filas y columnas de la hoja de trabajo activa a la altura y el ancho óptimos. Por ejemplo, la siguiente figura muestra cómo se ve el resultado:

La macro no cambia las celdas sin contenido; la altura y el ancho estándar permanecen activos para usted.

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

wave wave wave wave wave