Necesitaría saber en un rango de celdas, cuantas celdas están ocupadas

Necesitaría saber en un rango de celdas:

Sheets("Listado").Select
Range("F523:H545").Select

Cuantas celdas están ocupadas, solamente me interesa el numero de celdas que no estén vacías.

2 Respuestas

Respuesta
1

Lo he conseguido, poniendo:

=CONTARA(Listado!F523:H545)

Respuesta
1

Si quieres el código

cuantos = Application.CountA(Range("listado!F523:H545"))

o

cuantos = Application.CountA(Sheets("listado").Range("F523:H545"))

Hola Dante

Me da error en las 2

Sera que tengo 2003 el excel

Un saludo

Prueba la siguiente:

contar = Evaluate("=COUNTA(listado!F523:H545)")

Lo pongo así y nada:
contar = Evaluate("=COUNTA(listado!F523:H545)")
Lo he probado asi y nada:
=contar = Evaluate("=COUNTA(listado!F523:H545)")
No me sale nada
Un saludo Dante

Es código para una macro

Debes poner una macro así:

Sub CuentaCeldas
contar = Evaluate("=COUNTA(listado!F523:H545)")
range("A5") = contar
End sub

En la variable contar tienes el resultado de contar

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas