Positioning the Calendar on working screen

[MVM]

How to find the working screen top, left, width and height.
when I pop up the calendar it goes some times goes out of screen. This is
forcing the user to scroll the window.
I tried activewindow but it is not the working area.
Thanks for the help.
MVM

[Norman Jones]

Hi MVM,

Look at the VisibleRange Property in VBA help.

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

Set rng = ActiveWindow.VisibleRange

With rng
Debug.Print .Top, .Left, .Width, .Height
End With

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


---
Regards,
Norman


"MVM" <[email protected]> wrote in message
news:[email protected]...
> How to find the working screen top, left, width and height.
> when I pop up the calendar it goes some times goes out of screen. This is
> forcing the user to scroll the window.
> I tried activewindow but it is not the working area.
> Thanks for the help.
> MVM