ExcelBanter - Row Reference

ExcelBanter (https://www.excelbanter.com/)

- Excel Programming (https://www.excelbanter.com/excel-programming/)

- - Row Reference (https://www.excelbanter.com/excel-programming/342688-row-reference.html)

Can anyone help me with this code?

I'm not sure why it's not working

Private Sub MultiPage1_Change()
Dim RowNumber As Variant

RowNumber = Sheets("Access Upload").ActiveCell.Row

TextBox1.Value = Sheets("Access Upload").Range("A " & RowNumber & "")

End Sub

Hi,

Change:
RowNumber = Sheets("Access Upload").ActiveCell.Row

To:
RowNumber = ActiveCell.Row

If you need to ensure sheet integrity, activate the sheet first, then get
the row:

Sheets("Access Upload").Activate
RowNumber = ActiveCell.Row

HTH.

"Przybo" wrote:

Can anyone help me with this code?

I'm not sure why it's not working

Private Sub MultiPage1_Change()
Dim RowNumber As Variant

RowNumber = Sheets("Access Upload").ActiveCell.Row

TextBox1.Value = Sheets("Access Upload").Range("A " & RowNumber & "")

End Sub