Este tutorial demostrará cómo establecer la altura de las filas y los anchos de las columnas usando VBA.
Las alturas de filas de Excel y los anchos de columnas se pueden cambiar en VBA configurando las propiedades .RowHeight y .ColumnWidth.
Establecer el ancho de la columna con VBA
Macro para configurar el ancho de columna de las columnas A a E:
| 123 | Sub Column_Width ()Columnas ("A: E"). ColumnWidth = 30End Sub |
Establecer la altura de la fila con VBA
Macro para configurar el altura de la fila de la fila 1:
| 123 | Sub RowHeight ()Filas ("1: 1"). RowHeight = 30End Sub |
Ancho de columna de ajuste automático
Excel ofrece la capacidad de "Autoajustar" los anchos de columna. Esta función ajusta el ancho de la columna para que la (s) columna (s) sea lo suficientemente ancha como para adaptarse a todo el texto que se encuentra en esa columna.
Para ajustar automáticamente los anchos de columna en VBA:
| 1 | Columnas ("A: B"). Ajuste automático |
Escribimos más sobre esto en otro artículo sobre cómo autoajustar una columna desde VBA, incluido cómo autoajustar todas las columnas usadas.
Altura de fila de ajuste automático
También puede ajustar automáticamente las alturas de las filas con un método similar:
| 1 | Filas ("1: 2"). Ajuste automático |
Establecer ancho de celda
También puede ajustar el ancho de las columnas haciendo referencia a una celda:
| 1 | Rango ("a1"). EntireColumn.ColumnWidth = 20 |
Establecer altura de celda
O ajuste la altura de las filas haciendo referencia a una celda:
| 1 | Rango ("a1"). EntireRow.RowHeight = 10 |
Obtener ancho de columna
Para obtener el ancho de columna de una columna:
| 12 | dim iColumnWidth siempre queiColumnWidth = columnas ("a"). ColumnWidth |
Nota: Esto devolverá Null si todas las columnas en el rango no tienen el mismo ancho.
Obtenga la altura de la fila
Del mismo modo, puede obtener la altura de la fila:
| 12 | dim iRowHeight siempre queiRowHeight = filas ("1"). RowHeight |
