Usamos el método Range.SpecialCells() en el siguiente código VBA para buscar y devolver detalles de la última fila, columna y celda usadas en una hoja de trabajo.
Data de muestra:
Data de muestra
Sintaxis:
expression.SpecialCells (Type, Value)
Por ejemplo: para devolver la última dirección de celda utilizada en una hoja activa. ActiveSheet.Range(“A1”).SpecialCells(xlCellTypeLastCell).Dirección
Código VBA:
Declaración de variables:
| Variable | Tipo de datos | Comentarios |
|---|---|---|
| Última fila | Largo | Buscar y almacenar la última fila utilizada |
| Última columna | Largo | almacenar la última columna utilizada |
| última celda | Cuerda | almacenar la dirección de la última celda usada |
'Variable Declaration Dim LastRow As Long, LastCol As Long, LastCell As String
Use la función SpecialCells para encontrar la última fila/columna/celda utilizada
'Find Last Used Row
LastRow = ActiveSheet.Range("A1").SpecialCells(xlCellTypeLastCell).Row
'Find Last Used Column
LastCol = ActiveSheet.Range("A1").SpecialCells(xlCellTypeLastCell).Column
'Find Last Used Cell
LastCell = ActiveSheet.Range("A1").SpecialCells(xlCellTypeLastCell).Address
Concatene las tres variables (LastRow/LastCol/LastCell), agregue una nueva línea entre las variables use Chr(10). Muestre el resultado final en un cuadro de mensaje de Excel.
'Display the last used row/column/cell MsgBox "Last Used Row : " & LastRow & Chr(10) & "Last Used Column : " & LastCol & Chr(10) & "Last Used Cell : " & LastCell
Implementación:
Siga los pasos a continuación para encontrar la última fila utilizada y la última columna utilizada en Excel VBA
Paso 1: agregue una forma ( Buscar la última fila/columna/celda ) en su hoja de trabajo.
Paso 2: haga clic con el botón derecho en » Buscar la última fila/columna/celda » y «Asignar macro…»
Paso 3: seleccione » findLastUsedCell «, puede ver una lista de macros si están disponibles en su libro de trabajo
Paso 4: guarde su archivo de Excel como «Libro de trabajo habilitado para macros de Excel» * .xlsm
Paso 5: haga clic en » Buscar la última fila/columna/celda » para ejecutar el código VBA. El código aparecerá debajo de la salida para el ejemplo anterior (Salida).
Producción:
Publicación traducida automáticamente
Artículo escrito por sk123online y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA