Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Use ActiveCell and ActiveCell End to create Range

Sub SelectDown()     Range(ActiveCell, ActiveCell.End(xlDown)).Select End Sub