LaunchIE

Dim TheBrowser As Object
'Codice

Sub LanciaBrowser()
Set TheBrowser = CreateObject("InternetExplorer.Application")
With TheBrowser
.Visible = True
.Navigate ("http://www.indirizzo.com")
End With
End Sub