Tecnología

Inicio

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

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


Uso de macros se pueden acelerar las acciones en Excel que hay que hacer una y otra vez mediante la automatización de ellos. Las macros también se pueden utilizar para recopilar datos que puedan ser necesarios para la programación adicional. Por ejemplo, puede ser necesario el número de celdas o filas en una tabla para garantizar que las funciones automatizadas de manipulación de datos según lo previsto. Para demostrar, una macro simple puede contar el número de filas en una hoja de cálculo y abrir un cuadro de mensaje que indica que el número.

Instrucciones

1 Abrir una nueva hoja de cálculo Excel y rellenar las primeras células en la columna B con palabras al azar, letras o números.

2 Haga clic en la pestaña "revelado" en la cinta de menú de Excel. Si no puede ver la pestaña "desarrollador" en 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 de verificación que dice "Mostrar ficha en el lazo."

3 Iniciar el Editor de Visual Basic, haga clic en el icono de Visual Basic o presionando Alt y F11 simultáneamente.

4 Haga clic en "Insertar" en el menú Editor de Visual Basic y optó por "módulos".

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

Sub CountNumberofRowsinColumnB ()

NonBlankRange ("Sheet1!B:B")

End Sub

Sub NonBlankRange (Srange como secuencia)

Dim countNonBlank As Integer, myRange As Range

Establecer myRange = Rango (Srange)

countNonBlank = Application.WorksheetFunction.CountA (myRange)

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

End Sub

Este código se adaptó de un proyecto en el "Microsoft Visual Basic .Net Paso a paso" 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 la macro.

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

Consejos y advertencias

  • Otra manera de contar las filas es utilizar la función "Count". Microsoft da el siguiente fragmento de código en el Excel 2003 VBA Referencia del lenguaje se citan a continuación. Para utilizar la función Count:
  • DisplayRowCount sub ()
  • Dim iAreaCount como número entero
  • Dim i As Integer
  • Hojas de trabajo ( "Sheet1"). Activar
  • iAreaCount = Selection.Areas.Count
  • Si iAreaCount <= 1 A continuación,
  • MsgBox "La selección contiene" & Selection.Rows.Count y "filas".
  • Más
  • Para i = 1 a iAreaCount
  • MsgBox "Área" & i & "de la selección contiene" & _
  • Selection.Areas (i) .Rows.Count y "filas".
  • Siguiente yo
  • Terminara si
  • End Sub
  • Esto tiene que tener el área a ser contadas seleccionado antes de la macro se ejecuta, por lo que si una sola célula se selecciona la respuesta que da será "1" y si se selecciona toda la hoja de cálculo que se leerá "1048576" (en Excel 2007) .
  • Utilizar macros en condiciones de prueba en primer lugar, mediante el uso de copias de las hojas de cálculo para probar las macros en, con el fin de salvar a la pérdida de datos importantes.