リンク先のアドレスをリスト形式で得たいと考えて下のプログラムを組んでみたのですが、List.AddItemの部分で「Nullの使い方が不正です」というエラーがでてしまいます。
もしよろしければ、どういうことか説明してもらえませんか?
お願いします。
Dim oElement As Object
Dim oItems As Object
Dim oItem As Object
Dim i As Integer
Dim n As Integer
Set oElement = IE.Document.getElementsByTagName("P")
For i = 0 To oElement.length - 2
Set oItems = oElement.Item(i)
Set oItem = oItems.childNodes(0)
List1.AddItem (oItem.getAttribute("href")), i
Next
解決できました。
ご覧になって考えてくれた方、ご迷惑をおかけしました。
ツイート | ![]() |