All this function does is get you through the door. I can not go any
further with this because I do not have access to this site.

To use:
-Paste the function into a module
-Then call it from another procedu

Sub OpenWebSite()
Call Get_Online_Report
End Sub


go back to the worksheet and press Alt + F8 then select OpenWebSite
and click Run.


Regards,
David Miller