checking if worksheet is blank

J

J.E. McGimpsey

On way:

Dim blank As Boolean
blank = Application.CountA(Sheets("Sheet1").Cells) = 0
 
Top