Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Move the active cell by using ActiveCell Offset

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