Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Determines the last row and column in the worksheet

Sub rowCol()      Set rngLast = Range("A1").SpecialCells(xlCellTypeLastCell)      lLastRow = rngLast.Row      lLastCol = rngLast.Column End Sub