Select cell in column A of a ScrollRow

[2Took]

Trying to get VBA to select cell in column A of a scroll row, meaning when top few rows are frozen and bottom portion of sheet is scrolled up, and top row there might be row 500 - need it to select A500, but getting this error:

Sub testA()
  ActiveWindow.ScrollRow.Column(1).Select
End Sub

 

[MARK858]

Maybe try...

Sub TopvisibleRow()
Dim xCell As Range
    With ActiveWindow.VisibleRange
      Set xCell = Cells(.Row, .Column)
    End With
   
    xCell.Select
End Sub

 

[2Took]

I just edited your code with .Column - 1), as my sheet also has A column frozen and it was selecting B column. Thanks!

 

[MARK858]

You're welcome

I just edited your code with .Column - 1), as my sheet also has A column frozen and it was selecting B column. Thanks!

If that is the case as I only used .Column for consistency in the code (as you didn't mention any columns being frozen), you might as well use one of the codes below rather than have Excel calculate then adjust the column reference

Sub TopvisibleRow()
Dim x As Range
    With ActiveWindow.VisibleRange
      Set x = Cells(.Row, 1)
    End With
    
    x.Select
End Sub

or

Sub TopvisibleRow()
Dim x As Range
    With ActiveWindow.VisibleRange
      Set x = Cells(.Row, "A")
    End With
    
    x.Select
End Sub