Como establecer el alto de una fila



Seguramente te encuentras programando una macro y de pronto necesitas saber como establecer el alto de una fila o como autoajustar el alto de una fila, bien los siguientes códigos te permiten establecer a través de una macro de Excel el alto de una fila, como así también  te mostraré como hacer autoajustable el alto de la fila, en el link siguiente te muestro como establecer el ancho de una columna y como autoajustar el ancho de una columna..



Recomiendo que leas un excelente libro sobre Excel el que te ayudará operar las planillas de cálculo, haz click acá, si quieres un libro sobre Excel, en inglés, entonces debes hacer click acá. Si lo que necesitas es aprender o profundizar sobre la programación de macros con VBA este es unos de los mejores cursos on line que he visto en internet.

Para establecer el alto de una fila se debe seleccionar o bien hacer referencia a la fila o rango y aplicar el siguiente código RowHeight = 20, mediante esta codificación se establece la fila en un alto igual a 20, ahí se debe poner el algo que se requiera, el código, para establecer en la fila dos una celda cuyo alto sea 20, es el siguiente.

Range("D2").RowHeight = 20


Si se desea establecer un conjunto de filas se debe referenciar las filas y aplicar el código, por ejemplo si se requiere que la fila 5 a la 8 tengan un algo de fila igual a 28 se debe realizar de esta forma:

Range("D5:D8").RowHeight = 28

Si en nuestra macro o los  datos que se ingresarán son de diferente tamaño quizás sea práctico establecer una fila auto ajustable, eso se logra con AutoFit; por ejemplo con la siguiente codificación se establece que las filas 5 a 8 sean auto ajustables, es decir variarán de tamaño dependiendo el alto de los caracteres introducidos.

Range("D5:D8").EntireRow.AutoFit

Copia y pega el código que se encuentra al final en un módulo y prueba el funcionamiento de los códigos brindados, verás como se establece el ancho de una fila, de un rango y como establecer celdas auto ajustables.

Desde el link del final se puede descargar cientos de macros que puedes adaptar a tu proyecto, su uso es libre, si te fueron de utilidad considera la posibilidad de invitarme una tasa de café para seguir subiendo cosas útiles.

Código que se inserta en un módulo



Sub AltoFila()
Range("D2").RowHeight = 20
Range("D5:D8").RowHeight = 28
Range("D5:D8").EntireRow.AutoFit
End Sub



Si te fue de utilidad puedes INVITARME UN CAFÉ y de esta manera ayudar a seguir manteniendo la página, CLICK para descargar en ejemplo en forma gratuita.


If this post was helpful INVITE ME A COFFEE and so help keep up the page, CLICK to download free example.


Si te gustó por favor compártelo con tus amigos
If you liked please share it with your friends