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 vote328 views1 answer
Excel vba assign shortcut key to button
VBA
0 vote379 views1 answer
Vba excel parser xml
VBA
0 vote357 views1 answer
Vba compare strings
VBA
0 vote366 views1 answer
Date as number vb
VBA
0 vote327 views1 answer
Vba apostrophe chr
VBA
0 vote360 views1 answer
Vba static variable
VBA
0 vote357 views1 answer
Vbnet hex to binary
VBA
0 vote341 views1 answer
Le contrôle SpinButton (Toupie)
VBA
3 votes370 views1 answer
Vba http request json
VBA
0 vote392 views1 answer
Method showalldata of object _worksheet failed vba
VBA