¿Cómo contar las filas en una hoja de cálculo Excel con una macro VBA

¿ Con ellas puede acelerar las acciones en Excel que hay que hacer una y otra vez mediante la automatización de ellos. Las macros también pueden utilizarse para recopilar datos que puedan ser necesarios para la programación adicional. Por ejemplo , puede ser necesario el número de células o filas en una tabla para asegurarse de que las funciones de manipulación de datos automatizado según lo previsto . Para demostrarlo, una simple macro puede contar el número de filas en una hoja de cálculo y abrir un cuadro de mensaje que indica que número. Instrucciones
1

Abra una nueva hoja de cálculo Excel y rellenar las primeras celdas de la columna B con palabras al azar , letras o números .

2 Haga clic en la " desarrolladores" pestaña en la cinta de menú de Excel. Si no puede ver la pestaña " desarrolladores" de la cinta de menú, haga clic en el icono de Microsoft Office en la parte superior izquierda de la ventana , haga clic en el botón " Opciones de Excel " , y haga clic en la casilla que dice " Mostrar ficha Programador en la cinta de opciones . "
3

Inicie el Editor de Visual Basic , haga clic en el icono de Visual Basic o pulsando Alt y F11 simultáneamente.

4 Haga clic en " Insertar " en el menú Editor de Visual Basic y eligió " Módulo "
5

Escriba lo siguiente en el cuadro de módulo: Sub

CountNumberofRowsinColumnB ()

NonBlankRange ( " . Sheet1 B : B ")

End Sub

Sub NonBlankRange ( Srange As String )

countNonBlank Dim As Integer , myRange como gama

Set myRange = Range ( Srange )

countNonBlank = Application.WorksheetFunction.CountA ( myRange )

MsgBox " Número de filas :" & countNonBlank , Srange

End Sub

Este código es una adaptación de un proyecto en el " Microsoft Visual Basic . Net Step by Step" se citan a continuación .
6

Haga clic en el icono de Excel en el Editor de Visual Basic para mostrar la hoja de cálculo Excel .
7

Haga clic en el icono de macro en la cinta de Excel y seleccione " CountNumberofRowsinColumnB " en el cuadro Nombre de macro.
8

clic en "Ejecutar " en el cuadro macro. Un cuadro de mensaje se abrirá que le indica cuántas filas se han llenado pulg