---

Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate "google.com"
objIE.Visible = 1