Address of first visible cell

[Guest]

How can I determine the address of the first visible cell in the active
worksheet?

That is the cell in the top, left-hand, corner that is visible in the
worksheet's current, scrolled, state?

Thanks for any help or suggestions

 

[Norman Jones]

Hi Jake,

Try:


'=============>>
Public Sub Tester()
Dim Rng As Range

Set Rng = ActiveWindow.VisibleRange.Cells(1)
MsgBox Rng.Address

End Sub
'<<=============

 

[Guest]

Perfect - thank you very much.
--
jake

Hi Jake,

Try:


'=============>>
Public Sub Tester()
Dim Rng As Range

Set Rng = ActiveWindow.VisibleRange.Cells(1)
MsgBox Rng.Address

End Sub
'<<=============