Cómo saber la última columna de un Excel con Visual Basic

Siguiendo con el post para conocer la última fila de un archivo Excel, puede que también nos pueda interesar cómo saber la última columna de un archivo Excel. Puede no ser muy habitual, pero no está de más saber cómo hacerlo.

Conocer el número de columnas

Para saber la última columna de un archivo excel con VBA, independientemente de si hay celdas en blanco en medio, utilizaríamos el código de más abajo, en el que definiríamos nuestra variable como Integer, ya que lo que necesitamos es un número.

Contando visualmente, queremos que nos de el número de la columna F, es decir, la columna 6. No queremos que se quede en la primera tabla, ya que el archivo tiene una segunda tabla.

Contar_Columnas_Espacios



El código irá a contar las columnas por la fila 1 hasta la última columna con información. No importará que haya columnas en blanco en medio.


Dim ultimacolumna As Integer
ultimacolumna = Cells(1, Columns.Count).End(xlToLeft).Column


Ventana Locales

Si activamos la ventana locales desde el menú Ver, y ejecutamos la macro paso a paso con la tecla F8, podremos ver el valor que ha tomado.

Ultima_Columna_Ventana_Locales

No hay comentarios:

Publicar un comentario

Otras entradas