Sub Sample2()
'Google Chromeを起動
("chrome.exe")
End Sub
VBAでURLを指定してGoogle Ghromeを起動する
Sub Sample3()
'Google Chromeを起動し指定URLに移動
CreateObject("WScript.Shell").Run _
("chrome.exe -url " & " https://jizilog.com/ ")
End Sub
Sub Sample4()
Dim Ch As Variant
Set Ch = CreateObject("WScript.Shell")
Ch.Run ("chrome.exe -url " & " https://fanblogs.jp/kitchenbancho/ ")
Set Ch = Nothing
End Sub
