teratail
回答率
85.30%
質問するログイン新規登録
トップに関する質問Selenium VBAでのデータ取得②

編集履歴

質問編集履歴

6

内容修正

2019/07/25 01:29

投稿

Nitta
Nitta

スコア96

title CHANGED
File without changes
body CHANGED
@@ -28,6 +28,7 @@
28
28
 
29
29
  ![イメージ説明](8e85df75ad2641f77b158accbde5493b.png)
30
30
 
31
+ ●フラッシュメッセージの図
31
32
  ![イメージ説明](05b6f00b0240e6773827bb8d8f4becea.png)
32
33
 
33
34
  以上、よろしくお願いします！

5

内容修正

2019/07/25 01:29

投稿

Nitta
Nitta

スコア96

title CHANGED
File without changes
body CHANGED
@@ -28,5 +28,7 @@
28
28
 
29
29
  ![イメージ説明](8e85df75ad2641f77b158accbde5493b.png)
30
30
 
31
+ ![イメージ説明](05b6f00b0240e6773827bb8d8f4becea.png)
32
+
31
33
  以上、よろしくお願いします！
32
34
  助けてください!

4

内容修正

2019/07/25 01:20

投稿

Nitta
Nitta

スコア96

title CHANGED
@@ -1,1 +1,1 @@
1
- Selenium VBAでのデータ取得
1
+ Selenium VBAでのデータ取得②
body CHANGED
File without changes

3

内容修正

2019/07/23 03:40

投稿

Nitta
Nitta

スコア96

title CHANGED
File without changes
body CHANGED
@@ -13,9 +13,9 @@
13
13
  　　>>ジュンク堂書店の部分
14
14
  Mydata1=elements2.Item(ix0).FindElementsByCss(" td.stCenter > a > span").Text
15
15
  　　>>店舗名の部分
16
- 　　Mydata2=elements2.Item(ix0).FindElementsByCss("td:nth-child(2) > a).Text
16
+ 　　Mydata2=elements2.Item(ix0).FindElementsByCss("td:nth-child(2) > a").Text
17
17
  　　>>店舗名の住所部分
18
- 　　Mydata3=elements2.Item(ix0).FindElementsByCss("td:nth-child(3)).Text
18
+ 　　Mydata3=elements2.Item(ix0).FindElementsByCss("td:nth-child(3)").Text
19
19
  　　goto BB
20
20
  　End if
21
21
 

2

内容修正

2019/07/22 23:54

投稿

Nitta
Nitta

スコア96

title CHANGED
File without changes
body CHANGED
@@ -15,7 +15,7 @@
15
15
  　　>>店舗名の部分
16
16
  　　Mydata2=elements2.Item(ix0).FindElementsByCss("td:nth-child(2) > a).Text
17
17
  　　>>店舗名の住所部分
18
- 　　Mydata3=elements2.Item(ix0).FindElementsByCss("td:nth-child(3) > a).Text
18
+ 　　Mydata3=elements2.Item(ix0).FindElementsByCss("td:nth-child(3)).Text
19
19
  　　goto BB
20
20
  　End if
21
21
 

1

内容修正

2019/07/22 23:44

投稿

Nitta
Nitta

スコア96

title CHANGED
File without changes
body CHANGED
@@ -11,11 +11,11 @@
11
11
  For ix0 = 1 To elements.Count
12
12
  　If elements2.Item(ix0).FindElementsByCss(" td.stCenter > a > span").Text = "在庫△ 取り置き可" Then
13
13
  　　>>ジュンク堂書店の部分
14
- elements2.Item(ix0).FindElementsByCss(" td.stCenter > a > span").Text
14
+ Mydata1=elements2.Item(ix0).FindElementsByCss(" td.stCenter > a > span").Text
15
15
  　　>>店舗名の部分
16
- 　　elements2.Item(ix0).FindElementsByCss("td:nth-child(2) > a).Text
16
+ 　　Mydata2=elements2.Item(ix0).FindElementsByCss("td:nth-child(2) > a).Text
17
17
  　　>>店舗名の住所部分
18
- 　　elements2.Item(ix0).FindElementsByCss("td:nth-child(3) > a).Text
18
+ 　　Mydata3=elements2.Item(ix0).FindElementsByCss("td:nth-child(3) > a).Text
19
19
  　　goto BB
20
20
  　End if
21
21
 
@@ -23,6 +23,9 @@
23
23
 
24
24
  BB:
25
25
  ```
26
+ 結果
27
+ Mydata1="",Mydata2="",Mydata3=""
28
+
26
29
  ![イメージ説明](8e85df75ad2641f77b158accbde5493b.png)
27
30
 
28
31
  以上、よろしくお願いします！