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 vote225 views1 answer
Find the name of the last excel sheet vb
VBA
0 vote248 views1 answer
Excel vba unlock sheet without password
VBA
0 vote225 views1 answer
Excel vba milliseconds
VBA
3 votes240 views1 answer
Vba folderexists
VBA
0 vote256 views1 answer
Vba sort the data Z to A
VBA
0 vote235 views1 answer
Vba paste values
VBA
-1 vote247 views1 answer
Vba code to add new column in table
VBA
1 vote241 views1 answer
How to check is the value enterd is a number or text in vba
VBA
0 vote236 views1 answer
Vbnet line chart showing extra space
VBA
0 vote247 views1 answer
Enable macros on opening workbook vba
VBA