Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Activate Next Blank Down

Sub ActivateNextBlankDown()     ActiveCell.Offset(1, 0).Select     Do While Not IsEmpty(ActiveCell)         ActiveCell.Offset(1, 0).Select     Loop End Sub