Use ActiveCell and ActiveCell.End to create Range : Range Add « Excel « VBA / Excel / Access / Word






Use ActiveCell and ActiveCell.End to create Range

 

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

 








Related examples in the same category

1.To add a range name for known range
2.To add a range name based on a selection
3.To add a range name based on a selection using a variable