Mega Code Archive

 

Categories / VisualBasic Script / Forms

 

Ride the Range from the Bottom to Find Last Row

Sub count()     cells(Rows.count, 1).End(xlUp).Select End Sub