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 vote310 views1 answer
How to enter Vbox manage commands
VBA
5 votes351 views1 answer
Vba low byte from INTEGER
VBA
0 vote307 views1 answer
Excel vba prevent saving workbook
VBA
0 vote288 views1 answer
Switch pictures with buttons vb.net
VBA
1 vote289 views1 answer
Excel vba force recalculation
VBA
1 vote287 views1 answer
Add a index column power bi
VBA
1 vote290 views1 answer
Excel vba compare 2 rows
VBA
0 vote286 views1 answer
Vbnet line chart showing extra space
VBA
8 votes344 views1 answer
Vba make integer
VBA
1 vote303 views1 answer
Set font for ms chart vb.net
VBA