Option Explicit
Dim myRng As Range
Sub Get_Next_AvailableRow()
Set myRng = Range("a65536").End(xlUp).Offset(1, 0)
MsgBox myRng.Address
End Sub
Get Next Available Row on ActiveSheet
Leave a Comment
You must be logged in to post a comment.
August 22, 2008 at 18:14 · Filed under VBA Examples
Option Explicit
Dim myRng As Range
Sub Get_Next_AvailableRow()
Set myRng = Range("a65536").End(xlUp).Offset(1, 0)
MsgBox myRng.Address
End Sub
You must be logged in to post a comment.