エクセルVBAでオンラインゲームのデータを読み込みたい
未読分:3件
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)
近田 伸矢, 植木 悠二, 上田 寛
IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。
Message#3 2015年10月10日(土)20時56分 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#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 |
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降