Hi all,

With a loop like this:

Do While ActiveCell < "" 'Loops until the active cell is blank.
...
ActiveCell.Offset(1, 0).Select
Loop

one can loop through a worksheet column until a cell is blank.

Is it also to possible to loop until the end (I mean, to continue even
when several cells are empty but non-emtpy cells are still present)??
(I would like to obtain the number of non-empty cells, or the index
of the last non-empty cell, but don't know whether such a function exists).

Thanks in advance,
Jonne.