I have a bit of code that searches a range object for the first blank cell:

Dim jswCell As Range

Range("B1:B280").Select
Set jswCell = Selection.Find(Empty)
Debug.Print jswCell.Row & "," & jswCell.Column

Once this is found, I would like it to start seraching from this blank cell,
continue down the column, and find the first "not blank" cell, regardless of
the value stored in that cell.

I have tried different ways of telling the .Find method to find the next
cell with a value, but everything I try gives errors. For instance,

Set jswCell = Selection.Find(Not Empty)

....will not find a "Not Empty" value. How should I code this?

Thanks!