質問編集履歴

2

内容を更新します。

2020/06/04 08:53

投稿

koyamashinji
koyamashinji

スコア45

test CHANGED
File without changes
test CHANGED
@@ -6,17 +6,9 @@
6
6
 
7
7
  1つ目のaタグのリンクをクリックするコードを作成しましたが
8
8
 
9
- なかなか動作が安定しません。
9
+ ====の中のloop ~ Wend の無限ループに
10
10
 
11
-
12
-
13
- 具体的には、
14
-
15
- ・ちゃんとa要素をクリックしリンク先のページに飛んでくれる場合(動作OK)と、
16
-
17
- ・親ページの表示のまま動かない場合(動作NG)
18
-
19
- があります。
11
+ 陥ってしいます。
20
12
 
21
13
 
22
14
 
@@ -30,9 +22,7 @@
30
22
 
31
23
  ちなみに、
32
24
 
33
- 下記コードの ■ 時点では、どちらも正しい情報が出力されます。
25
+ 下記コードの ■ 時点では、正しい情報が出力されます。
34
-
35
-
36
26
 
37
27
 
38
28
 
@@ -122,7 +112,7 @@
122
112
 
123
113
 
124
114
 
125
- Debug.Print HTMLDoc.frames(1).document.getElementsByTagName("a")(0) 
115
+ Debug.Print HTMLDoc.frames(1).document.getElementsByTagName("a")(0) 
126
116
 
127
117
 
128
118
 

1

======のマークを追記

2020/06/04 08:53

投稿

koyamashinji
koyamashinji

スコア45

test CHANGED
File without changes
test CHANGED
@@ -86,6 +86,8 @@
86
86
 
87
87
 
88
88
 
89
+ ======
90
+
89
91
  If HTMLDoc.frames.Length > 0 Then
90
92
 
91
93
 
@@ -114,9 +116,11 @@
114
116
 
115
117
  Next i
116
118
 
119
+ End If
120
+
121
+ ======
117
122
 
118
123
 
119
- End If
120
124
 
121
125
  Debug.Print HTMLDoc.frames(1).document.getElementsByTagName("a")(0) ■
122
126