質問編集履歴

5

初心者質問ではないようですが、自己解決っぽいです

2015/04/23 04:08

投稿

naow9y
naow9y

スコア13

test CHANGED
File without changes
test CHANGED
File without changes

4

いくつか問題だと思われる点を自分なりに書いてみました。

2015/04/23 04:08

投稿

naow9y
naow9y

スコア13

test CHANGED
File without changes
test CHANGED
@@ -72,10 +72,14 @@
72
72
 
73
73
 
74
74
 
75
- 画面移動を待つ処理が単にないだけなのでしょうか??
75
+ 画面移動を待つ処理が単にないだけなのでしょうか??
76
76
 
77
77
  Do While objIE.Busy Or objIE.ReadyState < READYSTATE_COMPLETE
78
78
 
79
79
  DoEvents
80
80
 
81
81
  Loop
82
+
83
+
84
+
85
+ ※ 必須の参照設定が出来ていないとか。

3

参考になるリンクを追加しました。

2015/04/23 02:56

投稿

naow9y
naow9y

スコア13

test CHANGED
@@ -1 +1 @@
1
- オブジェクト有効範囲??若しくはステートメント範囲??外の書き方。
1
+ オブジェクト有効期限
test CHANGED
File without changes

2

オブジェクトの有効期限。

2015/04/23 02:45

投稿

naow9y
naow9y

スコア13

test CHANGED
File without changes
test CHANGED
@@ -1,40 +1,14 @@
1
- VBADOM制御をしてIE自動作業をする今という何年か前か
1
+ □ 以下のリンク解説してる部分、分からない事があるので質問します。
2
+
3
+ http://ie.vba-ken3.jp/Methods/Navigate2/
2
4
 
3
5
 
4
6
 
5
- 微妙に活況をなしているプログラミングをています
7
+ ページ異動後は、オブジェクト内の参照が出来くなってまうのはどうしなのでょうか
6
8
 
7
9
 
8
10
 
9
- 何度か三流君のJRAの自動馬券購入を真似して、オブジェクトのステートメント
10
-
11
-
12
-
13
- 有効範囲??を超えてしまって、エレメントのツリー構造通りに書いても
14
-
15
-
16
-
17
- オブジェクトがありません等のエラーが出る時でも個々の部分はブラックボックスのまま
18
-
19
-
20
-
21
- 動けばいいで作って来した
11
+ □ 以下、サンプルコードになり
22
-
23
-
24
-
25
- ですがここで折角なので、その謎を解きたいと考えています。ココだけが詰まっていて、
26
-
27
-
28
-
29
- 他の部分はかなり自分でも理解できているつもりなのですが…
30
-
31
-
32
-
33
-
34
-
35
-
36
-
37
- □ 今回その最たる例となるコードが出来たので、これについてお教えいただければ幸いです。
38
12
 
39
13
  Private Sub CommandButton1_Click()
40
14
 
@@ -78,9 +52,7 @@
78
52
 
79
53
  'ここで以下のコードを書くと、ログイン「objIE.navigate "http://www.xxx.jp/a/auth"」
80
54
 
81
- 'のh1部分が表示されます。ココが私が今回謎に思っている部分のキーになる所だと、考えています。
55
+ 'のh1部分が表示されます。
82
-
83
-
84
56
 
85
57
 
86
58
 
@@ -90,17 +62,13 @@
90
62
 
91
63
  objIE.Quit
92
64
 
93
-
94
-
95
-
65
+
96
66
 
97
67
  End Sub
98
68
 
99
69
 
100
70
 
101
71
  ちょっとわかりずらいかもしれませんが、何とかご教授お願い致します。
102
-
103
-
104
72
 
105
73
 
106
74
 

1

もしかして、待ちが無いだけとか??

2015/04/23 02:44

投稿

naow9y
naow9y

スコア13

test CHANGED
File without changes
test CHANGED
@@ -99,3 +99,15 @@
99
99
 
100
100
 
101
101
  ちょっとわかりずらいかもしれませんが、何とかご教授お願い致します。
102
+
103
+
104
+
105
+
106
+
107
+ 画面移動を待つ処理が単にないだけなのでしょうか??
108
+
109
+ Do While objIE.Busy Or objIE.ReadyState < READYSTATE_COMPLETE
110
+
111
+ DoEvents
112
+
113
+ Loop