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 vote212 views1 answer
Excel vba current folder
VBA
4 votes224 views2 answers
Vba last row
VBA
0 vote216 views1 answer
Vb.net change cursor to wait
VBA
0 vote215 views1 answer
Vba find sub dictionary
VBA
-1 vote213 views1 answer
Text to speech vb.net
VBA
3 votes243 views2 answers
Vba date to string
VBA
0 vote276 views1 answer
Application.ExecutablePath VB.NET
VBA
3 votes216 views1 answer
Vba make long from two shorts
VBA
1 vote233 views1 answer
Set font for ms chart vb.net
VBA
1 vote215 views1 answer
Vba declare api 64 bit 32 bit
VBA