VBA -Excel Find First cell With Data

Question

I am currently using the following piece of code in a macro to find the first cell will data in a row, and to move the cursor to that cell.

    Do While IsEmpty(ActiveCell)
    ActiveCell.Offset(1, 0).Select
    Loop

It would like to find a way to be more efficient, this code scrolls down and takes a little to much time.

Any Suggestions would be appreciated.

Thanks!

Answer 1

I would use xlDown for it. Would work in the other direction (xlUp) and for columns (xlLeft, xlRight), too:

Sub JumpToNextNotEmptyCellBelow()

    ActiveCell.End(xlDown).Select  
 
End Sub