There is no event for that.

Dim rng as Range
set rng = activewindow.VisibleRange.Rows(1).Cells
msgbox rng(1,rng.columns.count).Address


"OKLover" wrote in message
...
What's the corrent event for a worksheet window scrolled?
And how to detect the current visible window top-right cell's adress?