エクセルVBAでオンラインゲームのデータを読み込みたい 削除
| 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 |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。
