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.
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
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.
No hay comentarios:
Publicar un comentario