三流君 ken3のmemo置き場

三流プログラマーのメモ書きです。主にVBAやWindowsの話題が多いです

挨拶・自己紹介:
失敗続きのAB型の変わり者 :三流プログラマー Ken3です
フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 現在は小さな案件の受注請負 と 短期派遣 で 日々つつましく?ほそぼそと暮らしてます。

よく検索されるキーワード: [質問回答XXXXさんへ] [CreateObject] [VBA] [JRA競馬オッズ]

XXXXさんへ の検索結果:

XXXXXさんへ IE操作 次への処理について・・・案だけ回答

下記の質問をいただきました。 ヤフーファイナンスの信用買い残のデータを77表分ワークシートに取得するにはどういうコードを書いたら良いか悩んでいます。 最初の表は取得出来るのですが、下の数字や次へを自動的に押して取得する方法が上手く出来ません。 ご教授頂けると幸いです。 URLは、下記の通りです。 http://info.finance.yahoo.co.jp/ranking/?kd=15&tm=w&vl=a&mk=1&p=1 宜しくお願い致します。 急ぎかもしれないので、手抜…

XXXXXさんへ IE操作 img src の ファイル名を取得したい

※いつもの、脳内垂れ流し動画です。 【IE操作 VBA】データ取得の基本?.InnerTEXT.OuterHTML For Each で回す【三流君】 - YouTube www.youtube.com ※質問・ソースとあわせてみてください。 テストで、 http://ie.vba-ken3.jp/test/20160706/test20160706.html に↑テスト用ページを作成しました、 下記の質問をいただきました。 web上のテーブルデーターからExcelで計算可能…

XXXXXさんへ IE操作 .getElementsByTagNameで集め .NextSiblingで次を取得してみては?

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

XXXXXさんへ 自動操作除け 画像のボタンを押す方法について

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

XXXXXさんへ TypeNameでエラーの件 未解決でお力になれずスミマセン。

…ないで使ってみては?XXXXさんへ 起動済みIE、操作済み、既存の表示済みWEB画面を操作したい - ken3memo (三流君) http://d.hatena.ne.jp/ken3memo/20110823/1314115156 でも TypeNameを使っているのですが、 TypeNameの判断を止めて、実験してみるとか? Sub aaa() 'オブジェクトを格納する変数 Dim objShell As Object, objWindow As Object 'シェルの…

XXXXXさんへ 古いExcelのダイアログシートが表示されていない(シートが非表示)なら

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

XXXXXさんへ IEのWithEventsを使ったイベント処理

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

XXXXXさんへ 新規に起動したIEを見つけるサンプル

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

XXXXXさんへ IE自動操作で「別のプログラムでOLEの操作が完了するまで待機を続けます」で止まってしまう件ですが...

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

XXXXXさんへ VBA IE 表の取り込みサンプルが rowspan colspan に対応してなくて お力になれずスミマセン

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

XXXXXさんへ TDタグを見つけたら.parentElementを使って親TRを探し、その下を探ってみては?

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

XXXXXさんへ Outlook指定したサブ フォルダー名のメールをExcelで取得したい

前回の回答 XXXXXさんへ ExcelでOutlookの受信メールを読むサンプル - 三流君 ken3のmemo置き場 http://d.hatena.ne.jp/ken3memo/20120415/1334453463 が失敗した と 感じたので、追加メッセージ・・・(ぉぃぉぃ) >if subFolder.name="****" Then など、処理したいフォルダーの名前がわかっているなら(固定なら) そんな時は、 ドットで重ねてフォルダーを指定するといいかも?'メール…

XXXXXさんへ ExcelでOutlookの受信メールを読むサンプル

>OUTLOOKをエクセルに読み込みたくコードを真似して作ったのですが >動作しません。ご指南頂けると助かります。 Cells(y, "A") = objMAIL.CreationTime Cells(y, "B") = objMAIL.SenderName Cells(y, "C") = objMAIL.Subject Cells(y, "D") = objMAIL.Body objMAIL. あっ、 私のサンプルページがまとまっていなくてobjMAIL と変数使っていたり…

XXXXXさんへ VBA で カーソル移動のAPI SetCursorPos を使ってみては?

…きません・・・ ・XXXXXさんへ Aタグ リンクの文字を探して押す - 三流君 ken3のmemo置き場 ・XXXXXさんへ IE操作で DoEventを入れたり処理待ちを入れてみては? - 三流君 ken3のmemo置き場 ・XXXXXさんへ IE操作 .Focus で フォーカスがセットできると思います。 - 三流君 ken3のmemo置き場 の 流れ、続きです。(※完璧に避けられているなぁ、嫌われたかな(笑))カーソル移動のAPI>わたしの力ではVBAでマウスの動きを…

XXXXXさんへ IE操作 .Focus で フォーカスがセットできると思います。

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

XXXXXさんへ IE操作で DoEventを入れたり処理待ちを入れてみては?

XXXXXさんへ Aタグ リンクの文字を探して押す - ken3memo (三流君) の 続きで ダメでした、、と連絡をいただく(涙) >幾度と申し訳ございません。 > > For Each objA In objIE.document.all.tags("A") 'Aのタグを.allから抜く > MsgBox "確認用" & objA.innerText '確認できたら消す > If objA.innerText = "送る" Then '.InnerTEXT値(リンクの名…

XXXXXさんへ Aタグ リンクの文字を探して押す

下記の質問がきました。 <li class="mode"><a tabindex="2" href="javascript:void(0)" onClick="send()">返信</a></li> <li class="wmode" style="display:none;"><a tabindex="3" href="javascript:void(0);" onClick="Question();">質問</a></li> <li class="dmmode" styl…

XXXXXさんへ 4/1だけど 三流君の真実は...

下記のような質問メッセージをいただきました。 >「三流」とはおっしゃっていますが、私から見たらあなたが羨ましいかぎりです。 >どうすれば、三流君のようにスラスラプログラムが書けるのか、、、と動画を感心して観ていました。 >本当は、メールアドレスを書いて返信していただきたいのですが、現在アドレスが無いもので。。。 あっ、これですか、 4/1だけど本当のことを言うと... >スラスラプログラムが書けるのか、、、と動画を感心して観ていました。 なぜなら、その動画は成功した動画しかア…

XXXXXさんへ IE操作 VBA 参照設定で Microsoft Browser Helper が見つからない件

>UserForm3.web1.Document.body.innerText >で取得できました。 >ありがとうございました。 > >ところで,ken3さんのホームページでおっしゃっている,参照設定のことですが, >Microsoft Browser Helper が見つかりません。どのようにすれば表示させられるの >でしょうか? >バージョンは2010です。 参照設定で Microsoft Browser Helperが見つからない件ですが、フォームにIEを貼っているので…

XXXXXさんへ Document.body.Innertext を 試してみては?

>さて,ひとつお聞きしたいことがあります。 >UserForm1フォームに配置したIEコントロールに表示した >ウェブページのソース(テキストデータ)を取得するには >どのようにすれば良いのでしょうか? >UserForm1.web1.Document.textのようにしてみましたがダメでした。 >UserForm1.web1.Document.textのようにしてみましたがダメでした。書き方を objIE.Document.body.InnerHTML みたく ( 手前味噌…

XXXXXさんへ IE操作 IDやclassを指定してデータを抜き出したい

こんにちは。下記の質問をいただきました。 >三流さんのサイトでも複数の方法で >テーブルデータや特定のデータを抜き出して >処理を行っているのを拝見したのですが > >例えばですが) ><tr id="_pocketAtt" class="b01"> >↑このようなものや ><ul id="STATUS" class="clearfix"> >↑このようなもの ><LI id=timeLabel class=timeLabel> >↑このようなタグがあった場合に > >タグの…

XXXXXさんへ IE操作 検索語のセットも同じく NameやIDを探してセットしてみては?

下記の質問をいただく。 >Excelのマクロを使い、セルA1にワードを入力しコマンドボタンを押すと >①IEの社内専用ページを開く >②ID、PASSを入力してログイン >③検索ワード入力ヶ所にExcelのセルA1のワードを反映 >④検索実行 >⑤開いた画面をそのまま印刷 >という作業を実行させたいのですが、この③をどのように書いていいか分からず手間取っています。 > >携帯電話からの送信である為、読みにくいところがあったかと思いますが >どうぞよろしくお願いいたします。 こ…

XXXXXさんへ Outlook VBA 連絡先 更新方法 と アドレスでITEMを検索する方法

下記のような質問をいただきました。 教えてください。 エクセル上でマクロを起動して、Outlookの連絡先をエクセルに落としデータをそのままエクセル上で編集し、 編集したものをまたOutlookの連絡先に書きに行きたいのです。 Outlook機能のエクスポートとインポートをすると手順がいっぱいあって時間が掛かるので、 マクロで、決まった項目だけ抜き出して編集し、それをまた戻すことをしたいです。 中略 実演にはInputboxから入力したものを連絡先に【追加】でしたが、既に存在…

XXXXXさんへ IEのタグ表示は、外側を含めた .OuterHTML で 確認すると便利です。

とある三流プログラマーのデバック風景 です。笑ってやってください。下記の質問をもらいました。 ※IDとパスワードは消させてもらいました。 ※※株、FX系は、質問いただいてもテストできないから (テスト結果を出しにくいから敬遠してるんだけど。。。) '----------------- ここから質問 ログインIDとパスワードと入力する所までは うまく行くのですが、その後のログインボタンがどうしても押せません。 SubmitとClickを試してみたのですがそれでも駄目でした。 ど…

XXXXXさんへ Outlook VBA メニュー・コマンド から すべて送受信を探し 実行

アウトルックで下記の質問をいただきました。 >EXCELのVBAでOutLookを起動し未受信のメールをサーバーから受信した後に >未読のメールをエクセルに転記、その後OutLookを終了するVBAを作りたいの >ですが、 >起動後のOutLookでメールサーバから自動的に新規メールを受信する >部分ができません。 起動後に受信したいので、 送受信のコマンドを実行させてみます。と思ったら、追記 .Session.SendAndReceive(True) で 送信OKと連絡をも…

XXXXさんへ VBAでn秒待つには

こんにちは。下記の質問をいただきました。 >3.開いた文章 Document に アクセスするの章の中の「'手抜きで2秒待つ(オブジェクトの展開時間を待つ) >Application.Wait Time:=Now + TimeValue("00:00:02") '2秒間 ボーっとする」という部分でエラーが出てすすめません。 >コンパイルエラーはメソッドまたはデータメンバが見つかりませんと出たので参照設定にてMicrsoft Excel 11.0 Object Libraryも…

XXXXさんへ IEで開いているexcel処理のサンプルは

こんにちは。 >そこで1つ質問があるのですが、IEで開いているexcel上に記載しているリンクを >別のwindow(IE)で開きたいのですが、CreateObjectではなく、自分のwindowをコピーし、 >そのwindowでリンク先を開きたいのですが、可能なものでしょうか? 私も >IEで開いているexcel を処理するのは 詳しくはわからないのですが、探しにくいと評判の過去記事を自分で探してみると(本人でも探しにくかった(笑)) 似ている処理・テストが、 ここ ○○さ…

XXXXさんへ 参照設定した変数 As HTMLIFrame を使ってください。

>最後にお願いしたいのですが、私の参照設定を見ていただいて、 >KENさんと何か違うところがあるか見ていただきたいのですが >お願い出来ますでしょうか? >(私の参照設定が足りないことを祈りつつ…) > >Visual Basic For Applications >Microsoft Access 12.0 Object Library >Microsoft Excel 12.0 Object Library >Microsoft ActiveX Data Objects …

XXXXさんへ VBAでIE操作 フレームページを探って操作するテスト

前回 XXXXさんへ VBA IE操作で オブジェクト変数または With ブロック変数が設定されていません について - 三流君 ken3のmemo置き場 http://d.hatena.ne.jp/ken3memo/20111209/1323433071 の続き >1番と2番をためしましたがダメでした。 > >ie.document.all("selBrand")(0).selectedIndex = 1 > >やはりここで > >実行時エラー 91 >オブジェクト変数ま…

XXXXさんへ VBA IE操作で オブジェクト変数または With ブロック変数が設定されていません について

…たりする。 ※メニュー の HTMLと明細部分を分けて、HTMLの量を軽くするため? フレームになっていないか、確認かなぁ。。。 確認方法は(2011/12/15追加) XXXXさんへ VBAでIE操作 フレームページを探って操作するテスト - ken3memo (三流君) http://d.hatena.ne.jp/ken3memo/20111215/1323883317 を見てください。以上、3点を疑ってみました 解決の糸口となれば、幸いです。 三流プログラマー Ken3

Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。

  1. [VBA・マクロ プログラミング]の解説
    当店の人気はVBA系のCreateObject("XXXXXX.application")で他のアプリケーションを操作するサンプルが人気です
  2. [プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
    三流君を踏み台にする
  3. [古いクラシック ASP(Active Server Pages)]の解説。
  4. [元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。



本当に三流なんです(笑):たまにスゴイですねなんて言われることもありますが、
真実は→ [三流君の真実は...] ←を初めに見てくださるとわかると思います。
(からくりは、成功例↑しか載せてなくて ヒドイ失敗例はお蔵入り迷宮入りが多かったりします)