| Message#2 2015年7月29日(水)02時37分 From: VBAマスター |
| すいません、ざっくりとしかみてないのですが、「下記コードの「←ココ」という部分の最適な記述法をご教授頂けると大変助かります。」というところだけ回答すると以下はいかがでしょうか？ If TableTagName = "TD" Or TableTagName = "TH" Then ws.Cells(y, x) = TableItem.innerText If inStr(TableItem.innerHTML,"href") > 0 Then ws.Cells(y, x + 9) = TableItem.innerHTML ←ココ End If x = x + 1 End If Next |
↑エクセルVBAのIE(InternetExplorer)操作で分からない事があればこちらの掲示板よりご質問ください＾＾
ExcelのVBA初心者入門↑こちらはExcelのVBAをマスターできるよう初心者向けのエクセルVBA入門コンテンツになります^^
RSSフィードを登録すると最新記事を受け取ることができます。
こちらでは、エクセルVBAで実際に作成したIE(InternetExplorer)制御ツールをまとめています。自動ログインや情報収集など具体的に解説しています。IE(InternetExplorer)制御をされる方は参考にしてください。
こちらでは、これまでに紹介したIE(InternetExplorer)操作で便利な機能をツール化しています。無償でダウンロードできますので、目的に合わせたご利用ください。
こちらでは、IE(InternetExplorer)オブジェクトのメソッド・プロパティをまとめています。
こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたVBA関数をまとめています。
こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたステートメントをまとめています。ExcelのVBAで基本的な部分になりますので、しっかり理解しましょう。
こちらでは、これまでに作成したIE(InternetExplorer)操作で役立つサブルーチンをまとめています。
全てをコピーする必要はありませんが、目的に合わせたサブルーチンをご利用ください。
こちらでは、IE(InternetExplorer)制御の利用だけでなく、Excel全般で利用できるVBAコードです。エクセルVBAで役に立つものばかりですので、ご利用ください。