VBA Macro Code to Enter Intranet's Login/Pass?

[polaro]

Hello. I have an Excel macro which opens the Excel files, refreshes all contents, saves and closes them. When I launch the macro, the following prompt appears once:

Connect to Intranet
User name
Password

Remember my password

OK Cancel


How do I mimic the login/password entry in VBA to eliminate the need to interact with the prompt?

Thanks

PS: Below is a small fragment of the macro. The prompt starts when the macro tries to access the intranet file.

Application.WindowState = xlMinimized
Workbooks.Open Filename:= "

http://intranet/sitesd/metrics/GrossProfits.xlsx"

ActiveWorkbook.RefreshAll
ActiveWorkbook.Save
ActiveWorkbook.Close