getElementsByClassnameの配列 削除
| Message#2 2014年11月5日(水)08時53分 From: 管理人 |
| どのようなコードを記述したのかが分かるとより回答がしやすいです。 可能であればコードの公開よろしくお願いします。 また、おそらくやりたいことは以下のようなことだと思うのですが、あっていますか？ データ数をLengthプロパティで取得してfor〜Nextステートメントで処理をしています。 Sub sample() Dim objIE As InternetExplorer Dim cnt As Integer 'InternetExplorerで本サイトを起動 Call ieView(objIE, "http://www.vba-ie.net/") 'ClassName数取得 cnt = objIE.document.getElementsByClassName("txt").length For i = 0 To cnt - 1 '処理 Next i End Sub ただ、ループ処理をしたいのであれば、for Each〜Nextステートメント利用した方が 処理は簡単かと思います。 Sub sample() Dim objIE As InternetExplorer Dim objTag As Object 'InternetExplorerで本サイトを起動 Call ieView(objIE, "http://www.vba-ie.net/") For Each objTag In objIE.document.getElementsByClassName("txt") Debug.Print objTag.innerText Next End Sub |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。
