Excel last used row

Dim rLastCell As Range

Set rLastCell = ws.Cells.Find(What:="*", After:=ws.Cells(1, 1), _
    LookIn:=xlFormulas, LookAt:= xlPart, SearchOrder:=xlByColumns, _
    SearchDirection:=xlPrevious, MatchCase:=False)

MsgBox ("The last used column is: " & rLastCell.Column)
MsgBox ("The last used row is: " & rLastCell.Row)

Source: stackoverflow.com

Similar codes

0 vote212 views1 answer
How to add line graph vb net
VBA
0 vote200 views1 answer
Excel vba extract year
VBA
0 vote254 views1 answer
Excel vba delete columns in range
VBA
0 vote207 views1 answer
Excel vba disable keyboard input
VBA
0 vote225 views1 answer
Excel vba textbox forecolor disabled
VBA
0 vote204 views1 answer
Excel vba disable alerts
VBA
1 vote213 views2 answers
Vba function return array
VBA
0 vote204 views1 answer
Vb net show lines for all axis labels in chart
VBA
0 vote219 views1 answer
Do while not vb.net
VBA
0 vote198 views1 answer
Vb test if reference is null
VBA