Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1049 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【76598】入れ子の親タグのテキスト取得方法 Satsuki 15/2/2(月) 17:19 質問[未読]
【76600】Re:入れ子の親タグのテキスト取得方法 ichinose 15/2/3(火) 6:59 発言[未読]
【76608】Re:入れ子の親タグのテキスト取得方法 Satsuki 15/2/9(月) 15:49 お礼[未読]
【76598】入れ子の親タグのテキスト取得方法
質問  Satsuki  - 15/2/2(月) 17:19 -
引用なし
パスワード
   こんにちは、Satsukiと申します。

下記のような入れ子構造のタグがあり、「1500yen」の部分のみを取得したいのですが、
objIE.document.getElementById("price").innerText
と記述すると、「2000yen(改行)1500yen(改行)500yen」とすべてのテキストが表示されてしまいます。ローカルウィンドウでもどのinnerTextも上記のようになっています。
どのように記述したらいいでしょうか？
どなたかご教示のほどお願いいたします。

<span class="kakaku" id="price">
<span class="kyukakaku">2000yen</span>
<br />1500yen<br/>
<span class="sagaku">500yen</span>
</span>
【76600】Re:入れ子の親タグのテキスト取得方法
発言  ichinose  - 15/2/3(火) 6:59 -
引用なし
パスワード
   ▼Satsuki さん：
提示されたデータからだと


>objIE.document.getElementById("price").innerText
>と記述すると、「2000yen(改行)1500yen(改行)500yen」とすべてのテキストが表示されてしまいます。ローカルウィンドウでもどのinnerTextも上記のようになっています。
>どのように記述したらいいでしょうか？
>どなたかご教示のほどお願いいたします。
>
><span class="kakaku" id="price">
><span class="kyukakaku">2000yen</span>
><br />1500yen<br/>
><span class="sagaku">500yen</span>
></span>

MsgBox Split(objIE.document.getElementById("price").innerText, vbCrLf)(1)

MsgBox objIE.document.getElementsByTagName("br")(1).getAdjacentText("BeforeBegin")


こんな方法がありそうですけど・・。
【76608】Re:入れ子の親タグのテキスト取得方法
お礼  Satsuki  - 15/2/9(月) 15:49 -
引用なし
パスワード
   ichinose 様

お返事が遅くなり、大変申し訳ありません。

>MsgBox Split(objIE.document.getElementById("price").innerText, vbCrLf)(1)
↑の方法を使わせて頂きましたところ、上手く行きました。

>MsgBox objIE.document.getElementsByTagName("br")(1).getAdjacentText("BeforeBegin")
getAdjacentTextという方法もあるのですね。1つ目の方法が使えない時に、活用できそうですね。
大変勉強になりました。
ありがとうございました。

またわからないことがありましたら、よろしくお願いいたします。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1049 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free