Mega Code Archive
Categories
/
VisualBasic Script
/
Excel
Activate Next Blank To Right
Sub ActivateNextBlankToRight() ActiveCell.Offset(0, 1).Select Do While Not IsEmpty(ActiveCell) ActiveCell.Offset(0, 1).Select Loop End Sub