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 vote138 views1 answer
.net crash app
VBA
1 vote127 views1 answer
Excel vba convert text YYYYMMDD to date
VBA
5 votes135 views1 answer
Excel vba second byte from INTEGER
VBA
1 vote85 views1 answer
How to open cmd with vbd
VBA
0 vote126 views1 answer
Vba copy file
VBA
0 vote122 views1 answer
Vb.net visible property dgv collumn not working
VBA
0 vote115 views1 answer
Vba dictionary length
VBA
0 vote117 views1 answer
Limit combobox to list vba
VBA
2 votes128 views2 answers
Vba code to remove duplicates from a column
VBA
0 vote119 views1 answer
Telephon call in vba
VBA