ExecWB Method Example
Option 4 opens Saveas dialogbox and 2 will not prompt user.
Set objIExplorer = CreateObject("internetexplorer.application")
objIExplorer.visible = True
objIExplorer.navigate "google.com"
Do While objIExplorer.Busy
WScript.Sleep 1000
Loop
objIExplorer.ExecWB 4,2
See all Methods & Properties of InternetExplorer Object here.