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 vote203 views1 answer
Vba registry settings
VBA
0 vote174 views1 answer
Backspace key has stopped working visual studio
VBA
31 votes234 views1 answer
Excel vba function to convert column number to letter
VBA
0 vote193 views1 answer
Vba userform textbox wrap text
VBA
0 vote181 views1 answer
Not allow form to be resized
VBA
5 votes177 views1 answer
Xlvba double quotes in string literal
VBA
0 vote171 views1 answer
Excel vba Column Name from Column Number
VBA
0 vote169 views1 answer
Vbscript Trim
VBA
0 vote189 views4 answers
Jwt token vb.net validation
VBA
0 vote165 views1 answer
Excel vba copy entire sheet paste values
VBA