エクセルVBAでオンラインゲームのデータを読み込みたい
未読分:2件
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)
近田 伸矢, 植木 悠二, 上田 寛
IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。
Message#2 2015年6月28日(日)14時17分 From: 気ずる | 返事 削除 変更 |
VBAのIE操作についての質問はこちらですよ。 こちらがIE操作に特化した掲示板です。 http://www.vba-ie.net/qanda/qanda.cgi こっちはVBAの一般的な操作のようです。 > 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 |
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 |
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降