How to make sure a Cell is within the current visible window's ran
set rng = Activesheet.Range("Z21")
if intersect(rng,ActiveWindow.VisibleRange) is nothing then
Application.GoTo rng, true
End if
--
Regards,
Tom Ogilvy
"OKLover" wrote in message
...
as Title
|