VBA開発

VBAでIE操作「Internet Explorer最初のページの表示/戻る/進む/検索」

Internet Explorerを最初のページの表示/戻る/進む/検索

Excel VBAマクロでIEを自動操作する際、下記のようなIEの基本動作も行うことができます。

  • 最初のページ(ホームページ)の表示
  • 一つ前に戻る
  • 一つ先に進む
  • 既定の検索ページを表示(通常はIEなのでbing)

既にメソッドが準備されていますので、そのまま使用する事で簡単に動作させることができます。

IEを最初のページの表示/戻る/進む/検索サンプルコード

'■InternetExplorerで最初のページ、戻る、進むのサンプルコード
Sub sample_IE_goHome_GoBack_Goforward()
 
    Dim objIE As InternetExplorer
    
    '■IEを起動
    Set objIE = CreateObject("InternetExplorer.Application")
    objIE.Visible = True
 
    '■①指定したURLに飛び、Webサイトの表示を待つ
    objIE.navigate "https://vba-create.jp/"
    Call Call_IE_WaitTime
 
    '■②ホームページ(一番最初に開くページ)に遷移する
    objIE.GoHome
    Call Call_IE_WaitTime
 
    '■③現在のページの一つ前に戻る(①に戻る)
    objIE.GoBack
    Call Call_IE_WaitTime
 
    '■④現在のページの一つ先に進む(③に戻る)
    objIE.GoForward
    Call Call_IE_WaitTime

    '■⑤既定の検索ページを表示する
    objIE.GoSearch    
    Call Call_IE_WaitTime    
End Sub

注意点

その他

Internet Explorerを使用して、Webスクレイピングは敷居が高い風に捉えられますが、
上記のように、パーツ化して組み合わせ処理するだけです。

Web上のデータを触りたい要望は会社様でも個人様でも多いと思います。
VBA IE操作を覚えて効率化しませんか?
作成が大変であれば弊社で代行開発も可能です。お気軽にお問い合わせください。

 

コメント

タイトルとURLをコピーしました