Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Select ActiveCell and cells to its Left

Sub SelectToLeft()     Range(ActiveCell, ActiveCell.End(xlToLeft)).Select End Sub