Dim iURL Dim objShell iURL = "www.google.ie" set objShell = CreateObject("Shell.Application") objShell.ShellExecute "chrome.exe", iURL, "", "", 1