IE操作の自動化VBAで開いているページのタイトルを取得するVBAのIE(InternetExplorer)制御で開いているページのタイトルを取得する方法について解説しています。前回は、どのmeta要素のcontent属性値も抽出できるようにmeta要素のcontent属性の値を簡単に抽出できるサブルーチンの作成について解説しました。こちらを利用することで簡単にmeta要素の情報を抽出することができます。今回は、開いているページのタイトルを取得する方法について解説していきます。ページのタイトルについては、これまで簡単な事例で紹介しましたが、こちらではページのタイトルを取得する方法を詳しく解説していきます。いくつか方法がありますので、どのような道筋でページのタイトルを取得しているか確認してください。Model」の略称で、html・head・body・p・aなどのHTMLドキュメント要素にアクセスして取得や操作ができる仕組みのことです。以下はHTMLドキュメントをツリー構造に表したものでDOMツリーと呼ばれます。階層状のツリー構造でHTMLドキュメントを表現します。Language」の略称で、Webページを作成するために開発された言語です。世の中に公開されているWebページのほとんどがHTMLで作成されています。こちらのサイトもHTMLで作成されています。HTMLは基本的に以下のような構成でできており「<タグ名>★テキスト★</タグ名>」が1つの要素(エレメント)になります。この中の特定の要素に対してデータの取得や操作を行っていきます。<p>こちらはpタグのテキストです。href="★リンクURL★">リンクのアンカーテキストです。</body></html>タグと要素(エレメント)の違いHTML言語では、「タグ」と呼ばれる仕組みを利用して構築していきます。以下のイメージを確認すると分かりやすいと思いますが、タグとは「<」と「>」で構成されており、開始タグと終了タグまでの括りで1つの要素を形成します。具体例で説明するとWebページのタイトルを表す「titleタグ」を利用して開始タグの「<title>」と終了タグの「</title>」で括り、タグの中の文字列が「要素内容」となります。こちらでは「VBAのIE制御入門」の文字列が要素内容となります。こちらの「開始タグ+要素内容+終了タグ」の全体を「要素」と呼びます。別名では「エレメント」と呼ばれますので、どちらも同じ意味であることを理解してください。利用するサブルーチン・プロパティ・メソッド・VBA関数について今回利用するサブルーチン・プロパティ・メソッド・VBA関数は以下になります。利用方法については処理の解説で行いますが、どのような機能を持っているのか簡単に目を通してください。ieViewサブルーチンieCheckサブルーチンDocumentプロパティとはAllメソッドとはGetElementsByTagNameメソッドとはtitleプロパティとはLocationNameプロパティとはLengthプロパティとはinnerTextプロパティとはMsgBox関数とはInStr関数とはieViewサブルーチンとはieViewサブルーチンは指定したURLをInternetExplorerで起動させ、Webページが完全に読み込まれるまで待機処理をするマクロです。ieView("IEオブジェクト","表示させたいURLの文字列","IE表示・非表示の値[省略可]","Y位置の値[省略可]","X位置の値[省略可]","幅の値[省略可]","高さの値[省略可]")ieViewieCheckサブルーチンとはieCheckサブルーチンは指定したInternetExplorerオブジェクトのWebページが完全に読み込まれるまで待機処理をするマクロです。ieCheck("IEオブジェクト")ieCheckDocumentプロパティとはInternetExplorerオブジェクトのDocumentプロパティはHTMLドキュメントのオブジェクトを返すプロパティです。これによりHTMLドキュメントを操作することができます。objIE.document.プロパティ/メソッドDocumentプロパティAllプロパティとはDocumentオブジェクトのAllプロパティはHTMLドキュメント内の全ての要素(エレメント)を取得するプロパティです。objIE.document.All.プロパティ/メソッドobjIE.document.All(添え字).プロパティ/メソッドGetElementsByTagNameメソッドとはDocumentオブジェクトのGetElementsByTagNameメソッドはHTMLドキュメント内の指定したタグ名の要素オブジェクトのコレクションを返すメソッドです。objIE.document.GetElementsByTagName("タグ名")(添え字).プロパティ/メソッドtitleプロパティとはDocumentオブジェクトのtitleプロパティはHTMLドキュメントのタイトルを取得するプロパティです。objIE.document.titleLocationNameプロパティとはInternetExplorerオブジェクトのLocationNameプロパティはIEウィンドウに表示されているタイトル名を取得するプロパティです。objIE.LocationNameLengthプロパティとはAllコレクションのLengthプロパティは指定したAllコレクションの全ての要素数を取得するプロパティです。objIE.document.All.LengthinnerTextプロパティとは要素オブジェクトのouterHTMLプロパティは指定した要素オブジェクトの要素内のテキスト部分のHTMLコードを取得するプロパティです。objIE.document.GetElementsByTagName("タグ名")(添え字).innerText赤文字がpタグのouterTextの取得範囲になります。class="colorRed">outerText</span>の取得範囲</p>MsgBox関数とはMsgBox関数はダイアログボックスにメッセージとボタンを表示し、どのボタンが押されたかを示す整数型の数値を返します。検索し、最初に見つかった文字位置(先頭からその位置までの文字数)を返します。開いているページのタイトルを取得する処理の流れ以下が今回の処理の流れになります。開いているページのタイトルを取得するサンプルコードこちらのVBAコードは、IE(InternetExplorer)の開いているページのタイトルを取得するマクロです。IntegerこちらはSubステートメントに引数の設定がないsampleプロシージャになります。変数宣言でメモリ領域を割り当てるDimステートメントを利用してオブジェクト変数objIEに「InternetExplorer型」を、変数iに「整数型(Integer)」を変数宣言しています。"http://www.vba-ie.net/")次に他のプロシージャを呼び出すCallステートメントを利用してieViewサブルーチンを呼び出しています。引数にはオブジェクト変数の「objIE」を第二引数には表示させるURLの「http://www.vba-ie.net/」を設定しています。これによりInternetExplorerで本サイトのトップページが表示されます。iここからはallプロパティを利用してtitle要素を取得する処理になります。以下は理解しやすい様にVBAコードとキーワードの関連性を列挙したものです。関連性ですので必ずしも「=(イコール)」ではありません。all(i)の要素タグ内に含まれるテキスト(要素内容)こちらでは、指定した回数同じ処理を繰り返すFor~Nextステートメントを利用して全ての要素の数だけループ処理を行っています。ループ内の処理はIf~Then~Elseステートメントを利用してループ対象時の要素がtitle要素の場合にタイトルを抽出する内容となっています。InternetExplorerオブジェクトのdocumentプロパティを利用してHTMLドキュメントのオブジェクト(Documentオブジェクト)を取得します。次にDocumentオブジェクトのAllコレクションを利用してHTMLドキュメントのすべての要素を取得します。Allコレクションのlengthプロパティを利用してHTMLドキュメントの要素数を取得します。こちらの要素数がループ処理の回数になりますが、「0」から始まるため1引いた数値を設定しています。ループ処理内の処理でIf~Then~ElseステートメントとInStr関数を利用してループ対象時の要素が「<title>」の場合にその要素のテキスト(要素内容)を抽出します。この抽出されたテキスト(要素内容)がタイトル名となります。取得したデータはMsgBox関数の引数に設定しており、以下のようにメッセージボックスが表示されますので、処理を実行して確認してください。objIE.document.all.tags("title")(0).innerTextこちらの処理はAllコレクションのtagsメソッドを利用してタイトルを取得する処理になります。tagsメソッドには「title」を設定していますのでtitle要素のコレクションを取得します。titleタグはページ内に1度しか記述されませんが、配列として格納されているため添え字が必要ですので、1番目の要素の「0」を設定します。title要素オブジェクトを取得したら、innerTextプロパティでtilteタグ内のテキスト(要素内容)つまりタイトル名を抽出します。objIE.document.getElementsByTagName("title")(0).innerTextこちらの処理はgetElementsByTagNameメソッドを利用してタイトルを取得する処理になります。getElementsByTagNameメソッドには「title」を設定していますのでtitle要素のコレクションを取得します。こちらも先ほどと同様に添え字の「0」を設定します。title要素オブジェクトを取得したら、innerTextプロパティでタイトル名を抽出します。objIE.document.titleこちらの処理はdocumentオブジェクトのtitleプロパティを利用してタイトルを取得する処理になります。こちらはtitleプロパティを設定することでHTMLドキュメントのタイトル名を抽出します。objIE.LocationNameこちらの処理はInternetExplorerオブジェクトのLocationNameプロパティを利用してタイトルを取得する処理になります。こちらはLocationNameプロパティを設定することでIEウィンドウに表示されているページのタイトル名を抽出します。documentオブジェクトのtitleプロパティとInternetExplorerオブジェクトのLocationNameプロパティは同じような機能ですが、違いがありますので少し解説していきます。titleプロパティとLocationNameプロパティの違いについてtitleプロパティとLocationNameプロパティの違いについてですが、DocumentオブジェクトのtitleプロパティはHTMLドキュメントのタイトルを返します。フレームのあるページの場合、titleプロパティでは開いているページのタイトルだけでなく、フレームで設定されている複数のページのタイトルも取得することができます。以下はフレームのURLを取得する事例になりますので、確認してください。Sub詳しい処理内容については割愛しますが、「objIE.document.title」では開いているページのタイトルを取得し、「objFrame("frame1").document.title」と「objFrame("frame2").document.title」はフレームのタイトルを取得しています。以下は処理結果になります。フレームのタイトルをInternetExplorerオブジェクトのLocationNameプロパティで取得したい場合は一旦フレームのURLを取得し、そのページを単独で開いてからタイトルを取得するといった手間がかかりますので、フレームのタイトルを取得する場合はDocumentオブジェクトのtitleプロパティを利用するようにしましょう。次に開いているページのタイトルを取得する場合どの方法が一番有効かについてですが、どの方法を利用しても同じ結果なのでどれを選択しても問題ありません。処理数が多い場合はなるべく処理速度の速いものを利用した方が早く済みます。そこで、どの処理が一番速いのかを検証してみました。以下はそれぞれの処理を5000回繰り返し処理をした時間を計測したものです。こちらの結果を見ると処理4のDocumentオブジェクトのtitleプロパティが一番処理が速いことになります。webスクレイピングを行う以外はどれを選んでも大差はありませんが、webスクレイピングで処理回数が多い場合は、titleプロパティでの処理がオススメです。11.3735秒まとめ今回は、5つの方法で開いているページのタイトルを取得する方法について解説しました。最後にどの処理が一番速いかを計測しましたが、処理回数が多い場合はDocumentオブジェクトのtitleプロパティが一番早いことが分かりました。次回は、開いているページのURLを取得する方法について解説していきます。寛IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。↑こちらはExcelのVBAをマスターできるよう初心者向けのエクセルVBA入門コンテンツになります^^RSSフィードを登録すると最新記事を受け取ることができます。Model)についてHTMLドキュメント(全ての要素)を取得するHTMLドキュメントの要素数を取得するHTMLエレメント基本操作一覧(16)エクセルVBAでHTMLエレメント実践操作meta要素のkeywordsとdescriptionを抽出するmetaデータを抽出するプロシージャ開いているページのタイトルを抽出する開いているページのURLを抽出する特定の文書ドキュメントを抽出するid名から文書ドキュメントを抽出するプロシージャname名から文書ドキュメントを抽出するプロシージャclass名から文書ドキュメントを抽出するプロシージャタブ名から文書ドキュメントを抽出するプロシージャ指定した要素が存在するかチェックする指定した要素が存在するかチェックするプロシージャaタグのリンクURLを抽出するaタグのリンクURLを抽出するプロシージャaタグのリンクをクリックするaタグのリンクをクリックするプロシージャimgタグの画像情報を連想配列に格納する画像情報を連想配列に格納するプロシージャimgタグの画像URLを取得するプロシージャimgタグの画像をダウンロードして保存するファイルをダウンロードして保存するプロシージャtableタグの文書ドキュメントを抽出するエクセルVBAでHTMLフォーム基本操作テキストボックスに入力するパスワードボックスに入力するテキストエリアに入力するフォームテキストの入力プロシージャラジオボタンを選択するHTMLフォーム基本操作一覧(16)エクセルVBAでHTMLフレームの基本操作テキストボックスに入力するフォームテキストの入力プロシージャフォームボタン・ボックスを選択するフォームボタンの選択プロシージャHTMLフレームの基本操作一覧(8)エクセルVBAでIE制御の応用編Twitter(ツイッター)[3]アメブロ[1]FC2ブログ[1]IE制御の応用編一覧(7)【ダウンロード】IE操作に便利なツールこちらでは、これまでに紹介したIE(InternetExplorer)操作で便利な機能をツール化しています。無償でダウンロードできますので、目的に合わせたご利用ください。リンクIEオブジェクトのメソッド・プロパティこちらでは、IE(InternetExplorer)オブジェクトのメソッド・プロパティをまとめています。IE操作に利用されているVBA関数こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたVBA関数をまとめています。リンクIE操作に利用されているステートメントこちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたステートメントをまとめています。ExcelのVBAで基本的な部分になりますので、しっかり理解しましょう。IE(InternetExplorer)制御のVBAコードこちらでは、これまでに作成したIE(InternetExplorer)操作で役立つサブルーチンをまとめています。全てをコピーする必要はありませんが、目的に合わせたサブルーチンをご利用ください。Applications)を利用したIE(InternetExplorer)の制御についてまとめています。ExcelのVBAでIE(InternetExplorer)を操作することで自動ログインや自動データ入手などができますので、非常に便利なプログラムです。