VBA IE操作で下記の質問をいただきました。 >とあるサイトから、TEL番号を取得したいのです。 >EXCELファイルのB列にURLが100件以上並んでいます。 >そのURLを開いて、TEL番号を取得し、C列に記載…という処理をURLの個数分行うマクロで苦戦しています。>対象のソースの一部です。 <div class="clContent"> <!--infoBottom--> <div class="infoBottomArea"> <dl class="clear"> …

下記のような質問を最近よくいただきます。 >IDとパスワードについては、自動入力できるようになりましたが >ログインボタンの自動クリックができません。 >ログインボタンが画像になっていて困ってます。 ログインボタンが画像ロボット除け、先読み除けの処理で、 input type="image" で、押されたx,yを受け取り、 0,0 左上の場合は、人間はめったに押さないってことで、 相手側でチェックしているのかもしれませんね。昔から言われていて、私も良い処理方法を思い付いていな…

下記の質問をいただきました。 起動済みIE、操作済み、既存の表示済みＷＥＢ画面を操作したい と、思いまして、検索してここにたどり着いたんですが、 HPの方にある マクロを試してみたんですが、 Debug.Print "タイプは:" & TypeName(objWindow.document) ここで、止まってしまいます。 ここをコメントアウトすると、 次の If TypeName(objWindow.document) = "HTMLDocument" Then で、止まって…

ものすご〜く古いものらしくて １）VBAProjectを開いてみると、シートオブジェクトと標準モジュールはあるのですが、フォームが表示されません。 でも、実際の動きをみると、入力用のフォームなどは表示されます。 ２）良く見ると（Sheet表示を全部見ると）、シートオブジェクトに表示されないものがあって、そこにX1DG,X2DG・・・という名前のダイアログシートがあって、そのシート上にフォームがありました。 ３）Macroを動かすいわゆるボタンはなくて、リボンの中のアドインを選…

アップグレード価格 Windows 8 Pro アップグレード 日本語版が６千円台の記事 Windows8 Proのアップグレードは6080円 新キャラ窓辺ゆうと窓辺あいも登場 - 週刊アスキー にびっくりしてたら、(ぉぃぉぃ、情報遅いって)隣の記事、 『Windows 8 Pro 発売記念優待版』DL版は3300円！ - 週刊アスキー の３千円にさらにびっくりしたり...まぁ、困っていないなら変えなくてもいいんだけど、 １台くらいは 話のタネにアップグレードしとこうかなぁ。…

>DocumentCompleteのイベントを利用しようと >思い、三流君さんの下記URLのコードをそのままテストしてみた >のですが、その二つのイベントハンドラーに制御が渡りません。 > >http://d.hatena.ne.jp/ken3memo/20100114/1263452016 >WithEvents が使えるのが、クラスモジュールみたいで、 標準モジュールに書くと使えないので、> http://d.hatena.ne.jp/ken3memo/20100114/…

>リンクをクリックし開いたポップアップに、 >for each objTAG in objIE...系の処理をしたいのですが、 >objIEが親ページを参照しているためうまくいきません。 >objIEをアクティブページにするには、どのようにすればいいのでしょうか。 と質問をいただく。私が作成したサンプルで、似ている処理は、 http://ken3hitori.g.hatena.ne.jp/bbs/28/?from=1#1333152216 ↑かなぁ？ '今度は、入出金メニュー…

XXXXXさんより http://www.ken3.org/vba/backno/vba175.html から 下記の質問をいただく。 >大量のデータを処理すると >「別のプログラムでOLEの操作が完了するまで待機を続けます」の >ダイアログが表示されます。表示されたら「OK」ボタンを自動的に >クリックして次の処理に進みたいのですが、良い方法があったら >教えてください。 IE自動操作で「別のプログラムでOLEの操作が完了するまで待機を続けます」で止まってしまう件ですが..…

ガンダム バトルオペレーションって無料でも面白いのかなぁ？機動戦士ガンダム バトルオペレーション | バンダイナムコエンターテインメント公式サイトおっと、その前にPS3を買わないとプレイできないでしょ(ぉぃぉぃ)攻略本やキャンペーン機体 以外は 無料でも手に入るらしいし。 でも、出遅れたら 私みたいなトロいヤツは的になるだけでつまらないのかなぁ？ う〜ん。(※いまさらPS3買うのもなぁ・・・)ギルドやXXXチームみたいな団体は今のところ無いみたいなので、 ソロの人もすんなりプ…

XXXXXさんより、下記の質問をいただく。 > OKWaveでも質問させて貰っているので、そちらを見て戴いた方が早いのでURLを貼っておきます。 > http://okwave.jp/qa/q7555611.html > > 南関東の出馬表の取り込みを自動化したいのですが、VBAで出来るのでしょうか。 おっ、人力検索じゃなくってお隣ですね。 知らない都会の町には行きたくないしなぁ、でも勇気を出して恐る恐る質問を見に行く(ぉぃぉぃ) > 例えば下記のURLは、大井競馬の2012…

こんにちは。 返信、かなり遅れてすみません。 ><td>未取得</td>のテーブルのときにだけ該当のsubmitボタンを押させたいのですが、 >全てのサブミットのボタン名がaction_user_detail_indexで同じなため未取得の識別ができません。 <form style="float: left;"> <input type="hidden" name="uniq" value="da1" /> <input type="hidden" value="784" n…

enecycle EN01 11000ｍAh大容量携帯充電器 の 人気がスゴイ私のサイトでもクリック(見るだけ)されているので、 在庫あり、低価格 を 探している人が多いのかなぁ？Amazonだとenecycle EN01 11000mAh 12000mAh・付属AC充電器で急速充電が可能。メディア: エレクトロニクス購入: 4人 クリック: 63回この商品を含むブログ (2件) を見る↑みたいな感じですね。※それとも、 enecycle EN03 の 記事が流行っていて、 …

人気の本、ランキングを一覧しただけです。 ソーシャルゲーム,iPhoneアプリ開発が強いのかなぁ？ あっ、 Excel VBAのプログラミングのツボとコツがゼッタイにわかる本―最初からそう教えてくれればいいのに! が 根強い人気ですね。三流君のVBA http://www.ken3.org/vba/ も 更新して、見やすくしないとなぁ・・・と思いつつ最近放置だったり。。。 プログラミング 関係の書籍を探す(紹介します) [4774151114]- Mobageを支える技術 ~…

６月 人気の本 です。 あまり順位変動なし？ Excel VBAのプログラミングのツボとコツがゼッタイにわかる本―最初からそう教えてくれればいいのに!Excel2007/2003対応 がしぶとい人気ですね。 中身がよくて、タイルとがいいのかなぁ？ あとは、iPhone関連やAndroid系の本がいつものように上位にランクインしてますね。最初からそう教えてくれればいいのに かぁ...そんな感じなのかなぁ。 三流解説( www.ken3.org )も参考にして いいタイトル付けて…

… の関連商品 KeyWord(Jun-2012作成)検索ワード:ノートPCクーラー で 商品を探し、一覧表示します。 ↓現在の人気順で商品が一覧が表示されます↓ [ ノートPCクーラー の商品] 一覧を見る(商品を検索し、一覧表示します) ノートPCクーラー: 人気商品で完売して、在庫が無かったらスミマセン(最新の価格、在庫の有無が確認しにくくスミマセン) コメント:人気のキーワードです ノートPCクーラー 関連商品の紹介ノートPCクーラーに関連した商品を紹介します ↓↓関連…

ネットワーク対戦ゲームがネタ？の深夜アニメ アクセルワールドが少し気になって、 ネットでブログとか見ていたら、 ヒロインの先輩が嫌われていて？ ゴキブリ姫って書かれている記事が多かったり(同数以上、かわいい なんて応援記事もあるけど)で、さっき見たTV CMコンバットハンター「戦士」篇 http://www.kincho.co.jp/cm/html/combat_hunter/index.html http://www.kincho.co.jp/cm/html/combat_…

IE9から？ getElementsByClassNameってあるんだぁ。getElementsByClassNamehttp://q.hatena.ne.jp/1335028581 の コメントをみると、 IEの互換モード で 動作不可だったと、 自己解決されていました。下記が、人力検索の質問内容です。 >以下の質問がキャンセルされました。 > > >質問情報 >〜〜〜〜〜〜〜〜 >質問内容： 「 VBAでのgetElementsByClassNameについて >IE9でg…

最近人気の本を紹介、、、といっても、ランキングを載せただけで感想がないけど。 本のタイトルを見て、流行りものの確認ぐらいにはなるかなぁ・・・？プログラミング 関係の書籍を探す(紹介します) [4274068560]- アジャイルサムライ−達人開発者への道− [4774150312]- WEB+DB PRESS Vol.68 [4839941734]- よくわかるiPhoneアプリ開発の教科書【iOS 5＆Xcode 4.2対応版】 [4844362607]- 現場のワークフロ…

アクセスログを見ていたら、 古い記事VBAのIE操作のサンプル 6/6 .MenuBar プロパティ IE操作 VBA 三流サンプル - 三流君 ken3のmemo置き場 http://d.hatena.ne.jp/ken3memo/20090606/1244284535 に、来場者が多いと思ったら、最近、自動更新で、IE8/IE9に強引に更新され、 メニューバーが消えで困ってしまい、 解決方法を検索する人が多かったので、 検索エンジンから誤誘導されて 来る人が多いのが原因で…

動画で三流解説動画の簡単な説明処理したいフォルダーの名前がわかっているなら(固定なら) そんな時は、 ドットで重ねてフォルダーを指定するといいかも？'メールアイテムの処理 For Each mITEM In oFolder.Folders("テストサブ").Folders("sub3333").Folders("sub44444").Items 'アイテム数分ループ '↑代入が終わったので、各プロパティに mITEM.XXXX で アクセスするこんな感じで、フォルダー名が固定…

動画で三流解説動画の簡単な説明マウスカーソル 位置 指定 などで検索すると http://msdn.microsoft.com/ja-jp/library/cc411029.aspx など、 SetCursorPos が見つかります。スバリのVBA サンプルがほしかったので、 VBA SetCursorPos で 検索するとhttp://homepage1.nifty.com/MADIA/vb/API/SetCursorPos.htm などが見つかるので、そのままテストで使っ…

動画で三流解説動画の簡単な説明マウスカーソル 位置 指定 などで検索すると http://msdn.microsoft.com/ja-jp/library/cc411029.aspx など、 SetCursorPos が見つかります。スバリのVBA サンプルがほしかったので、 VBA SetCursorPos で 検索するとhttp://homepage1.nifty.com/MADIA/vb/API/SetCursorPos.htm などが見つかるので、そのままテストで使っ…

年4月 人気の本 と 言ってもランキングを並べただけですが、よろしくお願いします。プログラミング 関係の書籍を探す(紹介します) [4798017973]- Excel VBAのプログラミングのツボとコツがゼッタイにわかる本―最初からそう教えてくれればいいのに!Excel2007/2003対応 [4274068560]- アジャイルサムライ−達人開発者への道− [4839941734]- よくわかるiPhoneアプリ開発の教科書【iOS 5＆Xcode 4.2対応版】 [47…

次は、開催地、競馬場単位でループさせてみます。場名を覚えた後にループさせてみます。'競馬場・開催地でループする。 jのループ For j = 0 To nJYO - 1 '↑上で保存したnJYOの分だけ回る でループを作り、 'name=m の オプションのj番目を選択する objSELECT.Item("m").OPTIONs(j).selected = True '単純にj番目をselected Trueでセレクト状態にする で選択後、決定を押し、 Call IE_INP…

変数を２つ作成して、 レース番号 と オッズの種類を覚えます。 Dim nR 'レース数 Dim strR_NAME(13) 'レース 通常連番だからいらないんだけど・・・ 'SELECTのタグを集める .getElementsByTagName("SELECT")を使用 Set objSELECT = objIE.Document.getElementsByTagName("SELECT") nR = objSELECT.Item("s").OPTIONs.Length '…

目的のテーブルを If objTABLE(n).Rows(0).Cells(0).InnerTEXT = "枠番" Then で探すことができたので、 中のデータ(テキスト)を取り出し、カンマ区切りで出力してみます。ポイントは、 .Rows.Length で 行数、 .Rows(y).Cells.Length で 列数 が取得できるので、単純にループで回してみました。ソースを見た方が はやいですね キット。 実行結果 と ソースを見て、アレンジしてください。実行結果 操作動画…

テーブルの左上が枠番となっているテーブルを探したかったので、Wscript.ECHO objTABLE(n).Rows(0).Cells(0).InnerTEXT みたいな感じて、 .Rows(0)で１行目、 .Cells(0)で１列目 の .InnerTEXTで中の文字を取得できるので、 If objTABLE(n).Rows(0).Cells(0).InnerTEXT = "枠番" Then で判断してみました。 おまけで、 Wscript.ECHO objTABLE(n…

テーブルのソースを確認したかったので、 表示済みのIEを探し、 .getElementsByTagName("TABLE")を使用して、テーブルを集めて、 Set objTABLE = objIE.Document.getElementsByTagName("TABLE") .Lengthで個数のチェック、 中身(.OuterHTML)をWscript.ECHOで出力してみました。 操作・確認手順の動画 : http://www.youtube.com/watch?v=gp6…

また また また、ダメでした、、と連絡をいただく(涙)(涙)(涙) >テキストボックスにカーソルが存在するのではなく、 >テキストボックス以外の場所でマウスが動いたことで送信されるようです。 > >わたしの力ではVBAでマウスの動きを感知させる手段が思いつきません・・・ ・XXXXXさんへ Aタグ リンクの文字を探して押す - 三流君 ken3のmemo置き場 ・XXXXXさんへ IE操作で DoEventを入れたり処理待ちを入れてみては？ - 三流君 ken3のmemo置き…

XXXXXさんへ Aタグ リンクの文字を探して押す - ken3memo (三流君) と XXXXXさんへ IE操作で DoEventを入れたり処理待ちを入れてみては？ - ken3memo (三流君) の 流れ、続きです。(※三度目の正直、二度あることは三度ある・・・(ぉぃぉぃ))またまた、ダメでした、、と連絡をいただく(涙)(涙) >待ち時間を入れても駄目でした。 >ふとしたことで気づいたのですが、 >何やら文章を書くテキストボックスのところにカーソルが存在する場合には、…