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 vote273 views1 answer
Vba set vs dim
VBA
0 vote298 views1 answer
Vba apostrophe chr
VBA
5 votes365 views2 answers
Excel vba write to the windows registry
VBA
31 votes459 views1 answer
Vba how to convert a column number into an Excel column
VBA
0 vote311 views1 answer
Vba verticalalignment
VBA
1 vote315 views1 answer
Add rows to datagridview vb.net
VBA
0 vote326 views1 answer
Excel vba round to whole number
VBA
0 vote330 views1 answer
Vba remove last vbcrlf
VBA
1 vote315 views1 answer
Change the first item in a queue vb.net
VBA
15 votes443 views2 answers
Xl vba dynamic string array
VBA