エクセルVBAでオンラインゲームのデータを読み込みたい
昨日以降(0) ２日前以降(0) ３日前以降(0) ４日前以降(0) ５日前以降(0)
| Message#1 2015年6月28日(日)09時31分 From: ちゃちゃみ | 返事 削除 変更 |
| VBAの超初心者です。 タイトルの作業を行いたいのですが、「実行時エラー '91': オブジェクト変数またはWith ブロック変数が設定されていません。」が表示されてしまいます。 プログラム内容は以下の通りです。 どのように変更すれば良いか、ご教示いただけると助かります。 Dim htmlDoc As htmlDocument Dim anchor As HTMLAnchorElement Dim work As String Dim i, row, col As Integer i = 1 Dim page As Integer '★★★ここに戦歴のMaxPageを設定★★★ page = 1685 '★★★ここに戦歴のMaxPageを設定★★★ row = 1 'For page = 1685 To 1 Step -1 Do While page > 0 '★★★ここに戦歴のLinkを設定★★★ IE.Navigate "ゲームのリンク先" & CStr(page) & "&rnd=XXXXXX" ←エラー箇所 '★★★ここに戦歴のLinkを設定★★★ Do While IE.Busy Or IE.ReadyState <> 4 DoEvents Loop |
昨日以降 ２日前以降 ３日前以降 ４日前以降 ５日前以降
