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 vote234 views1 answer
Reset border color textbox vba
VBA
0 vote238 views1 answer
Vba copy file
VBA
1 vote220 views1 answer
Excel vba get column name from number
VBA
0 vote225 views2 answers
Get excel file from email attachment in vba
VBA
8 votes497 views1 answer
Vba make a short integer from two bytes
VBA
1 vote235 views1 answer
How to remove zeros in excel
VBA
0 vote218 views1 answer
Vbs exec hidden
VBA
0 vote222 views1 answer
Vba get relative cell address
VBA
5 votes251 views1 answer
Excel vba how to unit test vba code
VBA
0 vote232 views1 answer
Vba collection contains
VBA