Cómo utilizar vba para ir a la última fila de una hoja de excel
Aprender a usar Visual Basic para Aplicaciones (VBA) en Excel que puede ahorrar tiempo en la búsqueda de datos en una hoja de trabajo. Microsoft Excel, una hoja de cálculo incluidos en Microsoft Office, le da las herramientas para analizar fácilmente los datos mediante el uso de fórmulas para cálculos complejos. Utilizar VBA para automatizar tareas rutinarias en Excel u otras aplicaciones de Microsoft Office.
Vídeo: Macro en Excel para copiar datos a otra hoja con condición
Abra Microsoft Excel 2007, haga clic en el "Desarrollador" pestaña y seleccione "Visual Basic."
Tipo "Sub goToLastRow ()" y pulse "Entrar" para crear un nuevo sub.
Escriba el texto siguiente para crear variables:
"Dim lastRow como número entero
Dim X As Integer"
Tipo "Para X = 1 a 25
Distancia("UN" & X) .SelectActiveCell.Value = "Adición de datos a la fila número: " &-X
Siguiente X
Distancia("A26").Seleccionar
ActiveCell.Value = " "
Distancia("A27").Seleccionar
ActiveCell.Value = " "" para crear un bucle que va a agregar datos a las primeras 25 filas. Agrega un "espacio" a las dos últimas filas.
Tipo "lastRow = ActiveSheet.UsedRange.Rows.Count" para obtener la última fila.
Tipo "MsgBox." La última fila en esta hoja de trabajo es: " & última fila" para mostrar la última fila a través de un cuadro de mensaje.
Tipo "End Sub" si necesario. Ejecutar su nuevo sub y verá un cuadro de mensaje con "La última fila en esta hoja de trabajo es: 27".
Vídeo: Encontrar la última fila con VBA
Consejos
- comprobar Su nueva sub debería tener este aspecto:
- comprobar "Sub goToLastRow ()
- comprobar Dim lastRow como número entero
- comprobar Dim X As Integer
- comprobar Para X = 1 a 25
- comprobar Distancia("UN" & X) .Seleccionar
- comprobar ActiveCell.Value = "Adición de datos a la fila número: " & x
- comprobar Siguiente X
- comprobar Distancia("A26").Seleccionar
- comprobar ActiveCell.Value = " "
- comprobar Distancia("A27").Seleccionar
- comprobar ActiveCell.Value = " "
- comprobar lastRow = ActiveSheet.UsedRange.Rows.Count
- comprobar MsgBox "La última fila en esta hoja de trabajo es: " & última fila
- comprobar End Sub"
referencias
- enlazar Microsoft: Creación de macros VBA para manipular hojas de cálculo en Excel 2007