Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado
Resultados 150x150, WorksheetFunction.CountA

WorksheetFunction.CountA

| 6 comentarios

La función WorksheetFunction.CountA cuenta el número de celdas que contengan datos o valores* que existen  en un rango o matriz. Es decir, la Funcion Count se utiliza cuando el usuario no necesite contar valores lógicos, texto o valores de error.

WorksheetFunction.CountA( Arg1,Arg2...)

* NOTA:

Nótese que un valor es todo tipo de información, incluidos texto vacío (“”) y valores de error. No se considera un valor a las celdas vacías.

Ejemplos:

  • Encontrar última celda

Dim lngUltimaCelda As Long

If WorksheetFunction.CountA(Cells) > 0 Then

 lngUltimaCelda = Cells.Find(What:="*", After:=[A1], _

 SearchOrder:=xlByRows, _

 SearchDirection:=xlPrevious).Row

 MsgBox lngUltimaCelda

End If

res 300x114, WorksheetFunction.CountA

(Para mayor visualización de la imagen, hacer click en la misma)

  •           Contar el número de celdas que contienen datos

Sub ContarCeldas()

Dim n As Integer

     n = Application.WorksheetFunction.CountA(Selection)

     MsgBox n & " celdas que contienen datos"

End Sub

Resultados 300x103, WorksheetFunction.CountA

(Para mayor visualización de la imagen, hacer click en la misma)

 

Otro ejemplo en excel:  WorksheetFunctionCOUNTA

 

Elaborado por: Alessandra Loconi

6 comentarios

Deja una respuesta

Los campos requeridos estan marcados con *.