check if range containing values
 

hi,

how can I check, if a cell range ( range("A1", "A5") ) contains any values?
i need to know, if the cells are empty.

thanks,
markus

check if range containing values
 

J.E. McGimpsey wrote:
Dim numVals As Integer
numVals = Application.CountA(Range("A1:A5"))
If numVals = 0 Then MsgBox "All Empty"

thank you! :)
markus

check if range containing values
 

Pieter Kuyck wrote:
WorksheetFunction.CountA(Range("A1:A5"))=0


thank you! :)
markus