VBA IEで自動URL確認

2022.02.14

Option Explicit
    Dim objIE

    'オブジェクトの作成
    Set objIE = CreateObject("InternetExplorer.Application")
    
    'IEを表示させる。Trueで表示
    objIE.Visible = True 

    '指定したURLを開く
    objIE.Navigate2 "https://yahoo.co.jp"
    '新しいタブで表示
(確認したいURLが増えたら追加)
    objIE.Navigate2 "https://www.youtube.com", &H800
    objIE.Navigate2 "https://www.google.com/", &H800
    objIE.Navigate2 "https://www.amazon.co.jp/", &H800