三流君 ken3のmemo置き場

メモ置き場、保管庫として利用。まとまっていませんがヨロシク

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


広告:


[記事一覧、バックナンバーを見る]

VBA

JRA HP から 単勝オッズの取り込み 開催場所でループ

1Rから12Rまでの書き出しができたので、 次は、 開催場所、開催日のループを作成してみます。www.youtube.com JRA 単勝オッズ 開催場所のループ処理 VBA IE操作 Ken3 ライブ プログラミング テスト中 です・・・ - YouTube1.開催日を取り出す 開催日を取り出…

IE操作 Web上の表 取り込み rowspan の対応を少し考えてみた

JRAオッズの取り込みで、 枠番の取り込みが正しくなく、 データがズレてセットされてしまった前回 ken3memo.hatenablog.com の続きです。下記、まだ慣れてない ライブ プログラミング動画。 単勝表の取り込み バグ修正 VBA IE操作 JRA Ken3 ライブ プログラ…

ライブ配信でIE操作の参照設定など JRAオッズ取得できなかったけど・・

なれないライブ配信 で 問い合わせの多い JRA オッズ取得 IE操作の参照設定などを解説してみました。 ※JRA単勝オッズぐらいは取得・・と思ったが、 約二時間かかって、こんなもんかぐらいしかできなかった ぉぃぉぃ参照設定とデバッグ風景 VBA IE操作 JRA Ke…

XXXXXさんへ outlook 予定表 日本語のプロパティ・メソッドページの紹介ありがとう

一つ前に 私が書いた記事 ken3memo.hatenablog.com http://ken3memo.hatenablog.com/entry/2017/07/11/011518 に対して、 読者様よりメッセージをいただく。世の中、すごい人、フットワークの軽い人がいて、 他の読者さんですが、 記事をアップしてから すぐ…

XXXXXさんへ .Sensitivity = olPrivate VBA Outlook 予定表 非公開設定について

下記のような質問が来たので、処理してみます いつも大変お世話になっております。 マクロ(VBA)で追加する予定を、非公開設定にしたいのです。 2週間あちこちwebを検索しましたが、 どのプロパティ(?)に何をセットすればいいのか、 まだわかりません。…

XXXXXさんへ 未解決 あとで調べる ◆質問「VBAのIE操作でリスト選択時にFireEventが効かない」

下記の質問をいただくが、解決しなかった。再度 あとで見てみる・・・ ◆質問「VBAのIE操作でリスト選択時にFireEventが効かない」〇VBAコーディングFor Each Obj In ObjIE.Document.getElementsByTagName("OPTION") If Obj.Value = "Black Gunmetal" Then Ob…

未解決 あとで調べる XXXXXさんへ VBA OUTLOOKの予定表の本文(Body)の一部を太字にしたい

未解決 あとで調べる >EXCELのVBAで生成したOUTLOOKの予定表の本文(Body)の一部を太字にしたいです。 ひと目、HTMLメール リッチテキストメールと勘違いしてしまったが、 予定表なんですよね。。。 ^^^^^^^※メールなら、HTML形式やリッチテキスト形式のサ…

XXXXXさんへ IE操作 msgBox を 入れて、デバッグする 三流な方法?

え~と、最近対応が冷たいと評判の三流プログラマーです ※冷たいと感じた方々、すみませんと冒頭で謝りつつ、下記、いつものグダグタデバッグ動画です。 【VBA IE操作】デバッグでMsgBox を 入れて、デバッグする 三流な方法? 【三流君】 - YouTube www.you…

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

※いつもの、脳内垂れ流し動画です。 【IE操作 VBA】データ取得の基本?.InnerTEXT.OuterHTML For Each で回す【三流君】 - YouTube ※質問・ソースとあわせてみてください。 テストで、 http://ie.vba-ken3.jp/test/20160706/test20160706.html に↑テスト用ペ…

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

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

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

下記の質問をいただきました。 起動済みIE、操作済み、既存の表示済みWEB画面を操作したい と、思いまして、検索してここにたどり着いたんですが、 HPの方にある マクロを試してみたんですが、 Debug.Print "タイプは:" & TypeName(objWindow.document) …

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

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

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

>リンクをクリックし開いたポップアップに、 >for each objTAG in objIE...系の処理をしたいのですが、 >objIEが親ページを参照しているためうまくいきません。 >objIEをアクティブページにするには、どのようにすればいいのでしょうか。 と質問をいただく。…

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

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

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

XXXXXさんより、下記の質問をいただく。 > OKWaveでも質問させて貰っているので、そちらを見て戴いた方が早いのでURLを貼っておきます。 > http://okwave.jp/qa/q7555611.html > > 南関東の出馬表の取り込みを自動化したいのですが、VBAで出来るのでしょうか…

IE9から? getElementsByClassNameってあるんだぁ。

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

Outlook VBA .Folders.Foldersと重ねてサブフォルダーを読む

動画で三流解説動画の簡単な説明処理したいフォルダーの名前がわかっているなら(固定なら) そんな時は、 ドットで重ねてフォルダーを指定するといいかも?'メールアイテムの処理 For Each mITEM In oFolder.Folders("テストサブ").Folders("sub3333").Folder…

VBA マウスカーソル 位置 指定 で SetCursorPosを使ってみた

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

VBA マウスカーソル 位置 指定 で SetCursorPosを使ってみた

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

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

前回の回答 XXXXXさんへ ExcelでOutlookの受信メールを読むサンプル - ken3memo (三流君) 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…

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

また また また、ダメでした、、と連絡をいただく(涙)(涙)(涙) >テキストボックスにカーソルが存在するのではなく、 >テキストボックス以外の場所でマウスが動いたことで送信されるようです。 > >わたしの力では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.inner…

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" style="display:none;"></li>

Outlook2007 VBA 全てのフォルダーを再帰処理で触ってみた

動画で三流解説動画の簡単な説明ソースコードは http://d.hatena.ne.jp/ken3memo/20120328 を見てください(※合わせてアレンジして遊んでください。)Folderオブジェクトを受け取ったら、 受け取ったオブジェクトの名前 と フォルダー内のアイテム (ここではメ…

VBA マクロ Outlook2007で作成したコードをExcel2007で使う

動画で三流解説動画の簡単な説明ソースコードは http://d.hatena.ne.jp/ken3memo/20120328 を見てください(※合わせてアレンジして遊んでください。)Outlookで作成したVBA マクロを Excelで動作させたいので、 移植してみます (※移植は大げさですね、移動・微…

Outlook2007で作成したサンプルをExcel2007へ

前回の http://d.hatena.ne.jp/ken3memo/20120328/1332887607 Outlookで受信フォルダーを下の階層まで調べるコード を Excelで動かしたくて、チャレンジしてみました。やりたいこと: Outlookで作成したVBA マクロを Excelで動作させたい 移植してみます (※移…

Outlook2007 VBA 再帰処理で全てのフォルダーに触ってみる

下記の質問をいただきました。 >OUTLOOKをエクセルで読み込むサンプルで >二階層までのループを全階層のループにしたいのですがどうしたらいいのでしょうか? >教えて頂けたら幸いです。 再帰処理※自分自身を呼ぶ関数で試しにOutlook2007で作成してみ…

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

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

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

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

Outlook VBA .SaveAsで連絡先を書き出すテスト

アイテム 連絡先のデータを.SaveAs ファイル名, タイプ olMSG で書き出してみた。怪しい実演動画いつもの怪しい実演動画(テスト動画です) Outlook VBA .SaveAsでアイテムを書き出す 下記のコードと合わせてみてください。テストで使用したコード 'アイテムの…

Outlook VBA .msg ファイル を .OpenSharedItem で 取り込み

動画で三流解説動画の簡単な説明.msg ファイル を .OpenSharedItemで取り込み(2007でテスト)フォルダーの指定でエラーが発生してしまう。。。 ※今後の課題とする.OpenSharedItemで取り込み までは、よかったが、 フォルダーに移動させようとするとエラーにな…

失敗サンプル Outlook VBA .msg ファイル を .OpenSharedItem で 取り込み

拡張子が .msg の Outlookアイテムファイル を .OpenSharedItem("ファイル名")で取り込みました。読み込み後、フォルダーの指定でエラーが発生してしまう。。。 そんな失敗サンプルです。※苦肉の策・強引に On Error Resume Next ですすめてますが・・・テス…

Outlook VBA Folderの下 に ITEMとFolder が 存在します

動画で三流解説動画の簡単な説明Outlookのアイテム(メール、連絡先、仕事、予定...) は、 フォルダーの下にぶら下がってます。.GetDefaultFolder で 既定のフォルダーを指定すると便利です.Display で 画面に表示します。.Items.Count でアイテム数 .Items(n…

Outlookのフォルダー を 探ってみた アイテムとサブフォルダー

Outlookのアイテム(メール、連絡先、仕事、予定...) は、 フォルダーの下にぶら下がってます。.GetDefaultFolder で 既定のフォルダーを指定すると便利ですOlDefaultFolders 列挙 をヘルプで見ると、 現在の Outlook プロファイルで扱うフォルダ タイプを指…

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

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

ログインページなどVBA IE操作 外側を含めたOuterHTMLで確認すると便利

動画で三流解説動画の簡単な説明ソースコードは http://d.hatena.ne.jp/ken3memo/20120223/1329950884 からコピーしてテストしてみてください。VBAのIE操作では、事前調査の時に 外側を含めた.OuterHTMLで確認すると便利 です。 そんな とある三流プログラマ…

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

動画で三流解説動画の簡単な説明簡単な解説は http://d.hatena.ne.jp/ken3memo/20120224 連絡先関係の手前味噌解説は http://www.ken3.org/cgi-bin/group/vba_outlook_Contact.asp を見てください。 . アウトルックの連絡先データを更新する方法を探ってみま…

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

下記の質問をいただく。 >Excelのマクロを使い、セルA1にワードを入力しコマンドボタンを押すと >①IEの社内専用ページを開く >②ID、PASSを入力してログイン >③検索ワード入力ヶ所にExcelのセルA1のワードを反映 >④検索実行 >⑤開いた画面をそのまま印刷 >とい…

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

下記のような質問をいただきました。 教えてください。 エクセル上でマクロを起動して、Outlookの連絡先をエクセルに落としデータをそのままエクセル上で編集し、 編集したものをまたOutlookの連絡先に書きに行きたいのです。 Outlook機能のエクスポートとイ…

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

とある三流プログラマーのデバック風景 です。笑ってやってください。下記の質問をもらいました。 ※IDとパスワードは消させてもらいました。 ※※株、FX系は、質問いただいてもテストできないから (テスト結果を出しにくいから敬遠してるんだけど。。。) '----…

Outlook VBA As Office.CommandBar から 送受信を探し .Execute で実行

動画で三流解説動画の簡単な説明かなりひどいソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120222/1329841331 を見て笑ってください。送受信のコマンドを実行させたかったので、 ActiveExplorer.CommandBars から、ツールを探し、 次に、 .Comman…

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

アウトルックで下記の質問をいただきました。 >EXCELのVBAでOutLookを起動し未受信のメールをサーバーから受信した後に >未読のメールをエクセルに転記、その後OutLookを終了するVBAを作りたいの >ですが、 >起動後のOutLookでメールサーバから自動的に新規…

Excel VBA から Outlook Object Library を 参照設定して使う

動画で三流解説動画の簡単な説明型指定しない サンプルコードが多い私が言っても説得力が無いんだけど、 ExcelなどでOutlookの操作を作成するときは、(Excelで開発して、.VBSに移植時も) Outlook Object Library を 参照設定して使うと便利です。 . アウトル…

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

こんにちは。下記の質問をいただきました。 >3.開いた文章 Document に アクセスするの章の中の「'手抜きで2秒待つ(オブジェクトの展開時間を待つ) >Application.Wait Time:=Now + TimeValue("00:00:02") '2秒間 ボーっとする」という部分でエラーが出てす…

2012/02/14 三流君 Outlook VBA テスト動画 その3

動画で三流解説動画の簡単な説明ソースコードと簡単な解説は http://d.hatena.ne.jp/ken3memo/20120214/1329185640 を見てください。 - Outlook VBAで、選択された氏名+フリガナを使用して、 仕事(タスク)を作成してみました。選択されたアイテムを知るには…

Outlook VBA 現在選択されているアイテムを探る テスト

動画で三流解説動画の簡単な説明テストのソースは http://d.hatena.ne.jp/ken3memo/20120214/1329170762 に置いておきます。改造したりして実験してみてください。アウトルックで現在選択されているアイテムを知りたかったので、 イロイロとテストしてみまし…

Outlook VBA 選択された連絡先の氏名+フリガナを使い、仕事を作成

Outlook VBAで、選択された氏名+フリガナを使用して、 仕事(タスク)を作成してみました。選択されたアイテムを知るには、 ActiveExplorer.Selection を使い、 解説とテスト Outlook VBA ActiveExplorer.Selection 選択されているアイテムを知りたい - ken3m…

Outlook VBA ActiveExplorer.Selection 選択されているアイテムを知りたい

Outlookで現在選択されているアイテムを知るには、 ActiveExplorer.Selection から探るといいかも。アイテムの数は? Application.ActiveExplorer.Selection.Count 1 で、選択されているアイテムの数がわかります。 (選択されている数、ctrl+クリックで複数選…