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 vote305 views1 answer
Vba find last column in a row with data
VBA
0 vote312 views1 answer
Excel delete ever other vba
VBA
0 vote294 views1 answer
Search combobox items vb.net
VBA
8 votes395 views1 answer
Vba convert 2 bytes to an integer
VBA
3 votes310 views1 answer
Excel vba make long from two shorts
VBA
0 vote273 views1 answer
Vbnet dynamically change excel sheet name
VBA
0 vote316 views2 answers
Excel vba number format file size
VBA
0 vote302 views1 answer
Vba variable number of arguments
VBA
0 vote262 views1 answer
Vb.net round to 2 decimal places
VBA
0 vote290 views1 answer
Vbnet chart make 0 gridline line different color
VBA