回答編集履歴
1
間違いのあったコード削除しました。すみません。
answer
CHANGED
|
@@ -1,5 +1,4 @@
|
|
|
1
1
|
以下のコードでどうでしょうか？
|
|
2
|
-
Find〇〇を続けて使うことで、表現として正しいかわかりませんが絞り込み検索的なことができます。
|
|
3
2
|
|
|
4
3
|
src属性はimg要素に設定されていて、figure要素の属性ではないです。
|
|
5
4
|
質問者さんの追記前のコードだとfigure要素の存在しないsrc属性を取得しようとしていることになると思います。
|
|
@@ -10,20 +9,6 @@
|
|
|
10
9
|
```VBA
|
|
11
10
|
Dim image
|
|
12
11
|
|
|
13
|
-
Set image = driver.FindElementsByClass("item-ph").FindElementsByCss("img")
|
|
14
|
-
’Set image = driver.FindElementsByClass("item-ph").FindElementByTag("img")
|
|
15
|
-
|
|
16
|
-
For j = 1 To brand.Count
|
|
17
|
-
|
|
18
|
-
Debug.Print image.Item(j).Text()
|
|
19
|
-
ws.Range("F" & j + 4).Value = image(j).Attribute("src")
|
|
20
|
-
Next
|
|
21
|
-
```
|
|
22
|
-
|
|
23
|
-
|
|
24
|
-
```VBA
|
|
25
|
-
Dim image
|
|
26
|
-
|
|
27
12
|
Set image = driver.FindElementsByClass("item-ph")
|
|
28
13
|
|
|
29
14
|
For j = 1 To brand.Count
|