質問編集履歴
2
エラー内容追加
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -20,5 +20,11 @@
|
|
|
20
20
|
Next el
|
|
21
21
|
```
|
|
22
22
|
|
|
23
|
+
エラーについて
|
|
24
|
+
```ここに言語を入力
|
|
25
|
+
実行時エラー:91
|
|
26
|
+
オブジェクト変数またはWithブロック変数が設定されていません
|
|
27
|
+
```
|
|
28
|
+
|
|
23
29
|
データがない場合の処理についてご教授いただけないでしょうか。
|
|
24
30
|
よろしくお願いいたします。
|
1
内容変更
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,5 +1,5 @@
|
|
|
1
1
|
VBAでのウェブサイト内のテキスト出力についてご質問があります。
|
|
2
|
-
下記のような構造になっているHTMLから「取得したい文字列」部分を取得
|
|
2
|
+
下記のような構造になっているHTMLから「取得したい文字列」部分を取得する処理を作成しました。
|
|
3
3
|
|
|
4
4
|
```ここに言語を入力
|
|
5
5
|
<dl class="signature">
|
|
@@ -8,10 +8,17 @@
|
|
|
8
8
|
</dl>
|
|
9
9
|
```
|
|
10
10
|
|
|
11
|
+
下記コードで取得ができたのですが、ウェブサイトのページによっては上記の<dl>タグがない場合があり、その場合は取得しないという処理ができずにいます。
|
|
12
|
+
For部分でif文を書けばいいかと思いましたが、その前の取得部分でそもそも取得できずエラーがでてしまう状態です。
|
|
13
|
+
|
|
11
14
|
試したコード
|
|
12
15
|
```ここに言語を入力
|
|
13
|
-
objIE.document.getElementsByClassName("signature")(0).
|
|
16
|
+
Set coltd = objIE.document.getElementsByClassName("signature")(0).getElementsByTagName("dt")
|
|
17
|
+
|
|
18
|
+
For Each el In coltd
|
|
19
|
+
Debug.Print el.innerText
|
|
20
|
+
Next el
|
|
14
21
|
```
|
|
15
22
|
|
|
16
|
-
|
|
23
|
+
データがない場合の処理についてご教授いただけないでしょうか。
|
|
17
24
|
よろしくお願いいたします。
|