I have the following code:

Dim rRepCell As Variant
Dim rRepRow As Integer

Application.Goto Reference:="Reps"    'existing range
ActiveCell.Offset(1, 1).Range("A1").Select
Selection.End(xlDown).Select
rRepCell = ActiveCell.Address(0, 0)
rRepRow = Selection.Row(rRepCell)

Where the line:

rRepRow = Selection.Row(rRepCell)

produces an error: Runtime error 451. Property let procedure not defined and property get procedure did not return an object.

Thanks in advance.

Can you explain what you want to accomplish?

Hi

I'm not sure what your after but this will give you the row number.

rRepRows = Selection.Row

Just remove this (rRepCell)

Based on the added remark in Excel vba - get the row number:

rRepRow = Range("Reps").Cells(1, 1).Offset(1, 1).End(xlDown).Row

Hi NevadaMax,

Please try the above suggestions, please you have further question about Excel DEV, I recommend you post the question to the MSDN forum for Excel

http://social.msdn.microsoft.com/Forums/en-US/home?forum=exceldev&filter=alltypes&sort=lastpostdesc

The reason why we recommend posting appropriately is you will get the most qualified pool of respondents, and other partners who read the forums regularly can either share their knowledge or learn from your interaction with us. Thank you for your understanding.

George Zhao
TechNet Community Support