Is column below title row blank

  • Thread starter Thread starter xp
  • Start date Start date
X

xp

Using Office 2007;

I need a function that would select the used range of a column below a
specified number of title rows and return true if this area is blank (i.e. no
entries of any kind apart from the title row(s).)

For example:

Public Function IsColumnBlank(argTitleRows as Long, argColNum as Long)
'select area below title rows specified
'determine if this area is blank
'return true if blank; false if not blank
End Function

Thanks for any help you may provide.
 
I think this is what you need:

Public Function IsColumnBlank(argTitleRows As Long, argColNum As Long)
As Boolean
Application.Volatile
LastDataRow = Cells(Rows.Count, argColNum).End(xlUp).Row
If LastDataRow = argTitleRows Then
IsColumnBlank = True
End If
End Function

Regards,
Per
 
Back
Top