CODEWITHSUNDEEP
excelvba
Foxhunt
Foxhunt

Reputation: 870

Next Non-blank cell in a Range

I am trying to get the next non blank cell of a column.

I would like to find a way to do it with something already existing (without a custom loop).

For example, I searched around the Find function :

item = Worksheets(ws).Columns(1).Find(what:= something , after:= previousitem)

But here I would need a what:= parameters, which mean non blank

Upvotes: 0

Views: 115

Answers (2)

Foxhunt
Foxhunt

Reputation: 870

So this works :

item = Worksheets(ws).Columns(1).Find(what:= "*" , after:= previousitem)

Upvotes: 1

Dominique
Dominique

Reputation: 17493

This can be done, using following key combination:

Ctrl + Arrow-Down

Record this in a macro and Excel will generate the correct VBA code for it.

Upvotes: 1

Related Questions