I thought I'd add that

Range("A1").Select
Application.Goto Reference:=Cells(165, 1)

Is close to what I need, it's just that sometimes it places row 165
under the frozen cells but other times it makes row 165 the last
visible row.

Might there be a solution that uses Goto and then scrolls into position
if row 165 is the last row?

Thanks again