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 vote157 views1 answer
Label de tableau dans des label.text en VBA
VBA
-1 vote175 views1 answer
Code for reading letters only in vb 6
VBA
0 vote152 views1 answer
Excel vba formatconditions range
VBA
0 vote160 views1 answer
Convert number to minutes in vba
VBA
0 vote156 views1 answer
Sort dictionary by key vba
VBA
5 votes172 views1 answer
Vba low byte from INTEGER
VBA
3 votes143 views1 answer
Excel vba make long from two shorts
VBA
0 vote149 views1 answer
Hello world vb.net
VBA
0 vote107 views1 answer
Excel vba arrondir
VBA
1 vote164 views1 answer
Excel date to unix timestamp
VBA