Is row visible?

[Charlotte E.]

Hi all,


When I open a spreadsheet row #900 is (usually) not visible, since I
simple don't have a monitor with such a high resolution

But row #1 is usualy visible, since the spreadsheet normally gets saved
with the cursor placed in cell A1.

Is there a way to test if a row is visible, within the shown screen area?

Not if the row itself is hidden, with 'hide row', but visible due to
screen resolution and placing of the cursor?


TIA,

CE

 

[Paga Mike]

;1613282']Hi all,


When I open a spreadsheet row #900 is (usually) not visible, since I
simple don't have a monitor with such a high resolution

But row #1 is usualy visible, since the spreadsheet normally gets save

with the cursor placed in cell A1.

Is there a way to test if a row is visible, within the shown scree
area?

Not if the row itself is hidden, with 'hide row', but visible due to
screen resolution and placing of the cursor?


TIA,

CE

Hi CE:

Give this a try:

Sub IsRowOnScreen()
Dim N As Long, s As String
N = Application.InputBox(Prompt:="Enter row number", Type:=1)
s = N & ":" & N
If Intersect(Rows(s), ActiveWindow.VisibleRange) Is Nothing Then
MsgBox "row not in visible window"
Else
MsgBox "row in visible window"
End If
End Su

 

[Charlotte E.]

Thanks guys


CE



Den 10.08.2013 10:32, Charlotte E. skrev: