ここから本文です

下記のソースからAタグのhrefの後のテキスト?の「かかか」と「あああ」だけを取得...

can********さん

2018/9/1300:29:44

下記のソースからAタグのhrefの後のテキスト?の「かかか」と「あああ」だけを取得したいのですが教えていただけないでしょうか?

<tr><td class="user-menu" ukey="3" style="cursor:pointer;"><span style="display:inline-block;position:relative;width:16px;height:11px;margin:0 0px 0 0px;"><img src="/images/mail.gif" width="16" style="position:absolute;top:0px;left:0px;"></span></td>
<td>初期グループ</td>
<td><A href="○○">かかか</A></td><td class="tl" style="word-break:break-all;"><A href="××">太郎</A></td><td class="tc" style="word-break:break-all;">なし</td></tr>
<tr><td class="user-menu" ukey="2" style="cursor:pointer;"><span style="display:inline-block;position:relative;width:16px;height:11px;margin:0 0px 0 0px;"><img src="/images/mail.gif" width="16" style="position:absolute;top:0px;left:0px;"></span></td>
<td>初期グループ</td>
<td><A href="△△">あああ</A></td><td class="tl" style="word-break:break-all;"><A href="◇◇">次郎</A></td><td class="tc" style="word-break:break-all;">なし</td></tr>

補足言葉が足りず申し訳ありません。VBAで取得したいのです。
4つのテキストのうちの、あああ と かかか だけ取得したいです。

閲覧数:
94
回答数:
2
お礼:
100枚

違反報告

ベストアンサーに選ばれた回答

kik********さん

2018/9/1315:40:16

VBA で良かったですか?ダメならスルーということで・・・

単に、文字列パターンとして処理すれば良いのですよね?
★~ ~★ 間は、sSrc に文字列を読み込んでいるだけなので、
別途 sSrc にセットできるのなら、その方法で・・・・
以下では、D:\Hoge\Moge.txt から入手して・・・

やっていることは、

初めに </tr> で区切ったもので
</A> で2つに区切った1つ目から、最後の > 以降を・・・

どうなりますか


Option Explicit

Public Sub Samp1()
   Dim sSrc As String
   Dim vA As Variant
   Dim i As Long, k As Long

' ★~
   Dim ffn As Integer
   Dim sFile As String

   sFile = "D:\Hoge\Moge.txt"
   ffn = FreeFile()
   Open sFile For Input As #ffn
   sSrc = StrConv(InputB(LOF(ffn), #ffn), vbUnicode)
   Close #ffn
' ~★

   vA = Split(sSrc, "</tr>")
   For i = 0 To UBound(vA) - 1
      vA(i) = Split(vA(i), "</A>", 2)(0)
      vA(i) = Mid(vA(i), InStrRev(vA(i), ">") + 1)
   Next
   i = i - 1
   ReDim Preserve vA(i)

   For i = 0 To i
      Debug.Print vA(i)
   Next
End Sub

質問した人からのコメント

2018/9/18 13:22:08

皆さんありがとうございました。
kikさんの方法でも取得できたのですが違う方法も模索してみたいと思います

ベストアンサー以外の回答

1〜1件/1件中

web********さん

2018/9/1409:27:47

HTMLドキュメントの一部分でしょうか?

提示されている部分だけをExcelで取り込むと添付画像のようなデータになります
(A列はイメージ画像なので表示されていませんが存在はしています)

HTMLドキュメントとして扱うのであれば考え方はいくつかあります
①テーブル内の1番目と3番目の<a>タグのinnerTextを取り出す
②<tr>タグ内の最初の<a>タグのinnerTextを順番に取り出す
③テーブル内の2列目のデータを取り出す
④テーブル全体をエクセルに貼り付けて2列目のデータを取り出す

どれもそれほど難しい処理ではないですが、元のデータがどんな形式で存在しているのかの提示がないとマクロの作りようがないです

HTMLドキュメントの一部分でしょうか?...

返信を取り消しますが
よろしいですか?

  • 取り消す
  • キャンセル

この質問につけられたタグ

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる