三流君 ken3のmemo置き場

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

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

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

VBA の検索結果:

Excel VBA WorksheetのChangeイベントに処理を書いてみたテスト

…get.Row < 100 Then Cells(Target.Row, "E") = Now End If End Sub テスト・蛇足の解説してみました デバッグ Excel VBA Worksheet_Changeイベントでシート内容を書き換えると再度Changeイベントが発生する - YouTube www.youtube.com お時間のある時に見て、笑ってください。 うまく修正できることを願いつつ、失礼します。 ※恥の上塗り、再度の不具合が無いことを願いつつ・・・

XXXXXさんへ VBA Outlook グラフ送信について

….ken3.org/vba/backno/vba183.html の VBA Outlook リッチテキスト形式のメール で グラフを送る ですが、 昔作成したサンプルなので、 Office2010からメニューがリボンになったので、 貼り付けが動かないみたいです。下記のサイトで指摘されてたり(なんか恥ずかしいぉぃぉぃ) https://answers.microsoft.com/ja-jp/office/forum/office_2010-excel/excel/cf4473…

XXXXXさんへ Access VBA MAIL アドレス帳から選択・送信操作について

…ことはないのですが、VBA Outlook アドレス帳 連絡先選択 で検索すると、 https://qiita.com/Q11Q/items/c5ae5cbc1744905f3288 https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/display-names-from-the-address-book https://detail.chiebukuro.yahoo.co.jp/qa/question_deta…

XXXXXさんへ IE操作 SELECTタグで動的に変化するページの操作について

vbaでWEBの、select操作を行いたいのですが、valueを設定するも、うまく動作しません。下記、①のselectで馬連を選択しても、②方式選択が更新されません For Each obj In ie.document.getElementsByTagName("select") If obj.Name = "betType" Then obj.Value = 5 web address https://www.oddspark.com/keiba/auth/Classi…

XXXXXさんへ JRA単勝取り込みサンプルプログラムの作りが悪くご迷惑をおかけしてスミマセン。

…サンプルで、「三流君VBAでIEのリンクを操作 Document.Linksを探る」 試したのですが、JRAのHBのリンク数は13個でした。JRA側が2017/08から何か変更したのでしょうか? 私のサンプルがご迷惑をかけたみたいです ※プログラムの作りが甘いからかも・・・やってみたら、動いてしまったのですが、 不具合を再現するために、イロイロと操作をしてみたら原因が判明・・・再現手順: ホームページから開催日を反転させて(範囲指定して)手動でコピーすると 2回新潟9日 と後…

XXXXXさんへ プロパティの.hwndを使ってみては?IEのウインドウハンドル

こんにちは。 >IEオブジェクトからIEのウインドウハンドルが知りたいのですが、どんな方法があるでしょうか? でよく使っているのは .hwnd かな。 SetForegroundWindow (IE.hwnd) など、 IEが持っているプロパティの.hwndを渡し使っています。ken3memo.hatenablog.com ken3memo.hatenablog.comネットの流れは速いので、 もう既に解決されているかもしれませんが、 解決の糸口となれば幸いです。 三流プログ…

XXXXXさんへ Outlook 仕分けルール .exeを実行 olRuleActionStartApplication は プログラムから作成不可?

…com/ja-jp/vba/outlook-vba/articles/managing-rules-in-the-outlook-object-modelルールの処理を指定する https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/specifying-rule-actions の表で、olRuleActionStartApplicationの 処理 olRuleActionType 定数 プログラムによる新しいル…

レジストリの変更を指示されたら? RegEdit レジストリエディタ使ってみた

…ules" を作成し、値を "1" にすると良いようです。 上記みたいな指示を受けたら レジストリエディタを ファイル名を指定して実行(Winキー+R)などで起動regeditあとは、指定したキーと値でレジストリを作成(変更)する決まり文句で ・レジストリをいじるときはバックアップしてから ・自己責任です の注釈付きかなぁさてと、手作業ができたので、VBAを探っていかないとなぁ・・・ken3memo.hatenablog.com ken3memo.hatenablog.com

XXXXXさんへ ごめんなさい Outlook 仕分けルール 私もよくわからなくて未解決です

…が、outlookのvbaで仕分けルールが自動で作成されるように組もうと思っています。件名に「三流」からメールが来たら「アプリケーションを開始する」というアクションを起こすというルール内容をマクロ起動にて作成されるようにしたいのですが、どうも「アプリケーションを開始する」コマンド?が見つかりません。。。 手動だと answers.microsoft.com のレジストリをいじると表示されるみたいですね。 VBAからセットするには、 廃止された隠しのプロパティなどあるのかなぁ…

XXXXXXさんへ JRA サイトから レース結果を取り込む

…書き込んでいきます VBAがそうなっているのは、理解していますが修正がわかり兼ねます②また、上記レース結果で『枠』(gif)が整数でないことからエクセルに 書き込みされません ここから、確認作業を開始する。1.不具合の確認 Excel起動後、 コードを走らせて、 不具合を確認する。結果の出ていないレース、発走前のレース処理がおかしかった。 枠の番号が取れていなかった。2.修正 2.1 結果が出ていないレースを飛ばす処理リンクをクリックするサブ関数で結果を strRETURN …

XXXXXXさんへ Outlook送信アカウントの切り替え .SendUsingAccount についてハマったテスト結果

Outlook VBA 送信アカウントの切り替え .SendUsingAccount = Session.Accounts("アカウント名")でハマってる・・下記の質問をいただいたので、試してます。 VBAでOutlookのメールを立ち上げることに成功しました。 差出人をデフォルトではなく、 別のアカウントで使いたいのですが、 単純にsendusingaccountを入れるだけではダメなんですね。 どうすればうまくいくんでしょうか。 複数メールアドレスを登録して、 テスト中で…

XXXXXXさんへ VBA コンボボックスの初期値処理 デバッグしてみました

VBA

…往のデバッグ動画 【VBA デバッグ風景】VBA コンボボックス 初期値のセットをデバッグ 2018-07-14【三流君】 - YouTube www.youtube.comコンボボックスの初期値は、.ListIndex を使用した .ListIndex = Month(myday) - 1 のままでもOKだと思います。また、.Valueを使用した UF002.ComboBox2.Value = Month(myday) の.Valueをセットでも動くと思います。値が" "空…

XXXXXXさんへ Excel VBA コードを VBSで動作させる時にエラーが発生する件

Excel VBA を VBS に変換する作業中に 「オブジェクトでサポートされていないプロパティまたはメソッドです」 エラーが発生しました。 と 質問をいただきました。ここから下質問文※一部カット VBAで無事複数メール送信の構文が出来ました。 そして、一番の難題であるVBSへの変換ですが、 まず私はVBAのマクロをこう作りました。 Enum 列 宛先 = 1 氏名 成績 件名 添付ファイル1 添付ファイル2 添付ファイル3 End Enum Sub メール作成() Dim…

XXXXXXさんへ Outlook 予定表 分類を探る olApptItem.Categories

…com/ja-jp/vba/outlook-vba/articles/appointmentitem-categories-property-outlook 'Display the Show Categories dialog box olApptItem.ShowCategoriesDialog MsgBox olApptItem.Categories を入れて、テストしてみます。いつもの右往左往した酔っ払いテスト動画 【Outlook VBA】予定表 Appointme…

XXXXXXさんへ Outlook サンプルの件 と 他のQAサイトで質問について

> 内容は下記となっております。 > https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q11192362626 detail.chiebukuro.yahoo.co.jp > > > 先に三流君様に許可をいただいてから、やるべきところを、恥ずかしながら回答者様にご指摘いただくまで、コードのライセンスという概念が無く、質問を行わせていただいておりました。 誠に申し訳ございません。 > >つきましては、現状URLの…

(未解決あとで検索する) XXXXXさんへ IE操作(JRA-IPAT) selectタグが動作しない件について

…ラリの中での話で、 VBA側とは違いそうですし、、、私も、無知で、ヒントすらだせなくてスミマセン。excel vba angularjs で検索すると https://teratail.com/questions/69838 など、見つかります。 ※質問文の一部に私のURLが含まれていて、少しビックリしたけど。アドバイスすら出せなくてすみません。 最近、SELECTタグで選択できない・・ と同じような質問を少しいただくので、 もしかしたら、同じようにangularjsを使用し…

XXXXXさんへ IE操作「Webページからのメッセージ」(Javascriptのalert)を消す方法

…tube.com 【VBA IE操作】Javascriptのalert「Webページからのメッセージ」を消すテスト【三流君】 - YouTube1.テスト環境、再現環境を作る 表示が 「Web ページからのメッセージ」 なので、 テストページでJavascript alertメッセージを使用している http://www.ken3.org/vba/test153.html を使ってみる。 'テスト、IE SELECTタグ 選択後、Javascriptのalertメッセが表示さ…

小話 無くて七癖 コードレビューしてますか?

きっかけは、久しぶりに人力検索はてな q.hatena.ne.jpで回答した後に、 自分の書いたコードを読み返してみて笑ってしまったので。 ※他の回答者のコードに刺激を受けたので、 コードレビューについて少々老害おっさんが小話を行ってみました。ライブ配信のテストを兼ねて小話をしてみました。 【プログラマー小話】無くて七癖 コードレビュー ほか ライブ解説テスト - YouTube www.youtube.com1.範囲チェックで定数<変数And変数<定数に疑問?2.Yes/N…

XXXXXさんへ グラフの単独要素をイベントで取得してみては? WithEvents As Chart

…はないでしょうか? VBA グラフ イベントで検索すると、 いろいろなページがヒットします、 そのなかから、下記の二つを参考にしてみました。埋め込みグラフでイベントを使用する https://msdn.microsoft.com/ja-jp/library/office/ff194070.aspx と Chartでイベント処理を行う-指定位置のグラフ要素を取得するには (Excel 97/2000) http://www.moug.net/tech/exvba/0020010…

XXXXXさんへ JRAオッズ取得 Excel2016でテストしたブックを保存しました

…Excelへ取り込むVBA - YouTube www.youtube.com要望には、すべてこたえられないと思いますが、 気長に、温かい目でお待ちを・・・ではまたぁ。下記の質問をいただく 単勝オッズの取得20170820.xlsmを回答して実行しましたが、動きません。 MENUシートのB2に入れた、「2回新潟9日 リンクが見つかりませんでした」 のMSGBOXが出てオッズを取得できません。こちらの環境はExecl 2013です。もう一つのサンプルで、「三流君VBAでIEのリ…

Excel UserForm Mode モードレスとIEを前面 おまけの WithEvents IE

…ストしていました。【VBA IE操作】IEの切り替え 前面にもってくるには?SetForegroundWindow【三流君】 - YouTube www.youtube.comせっかく、選んで、グローバル変数IEに保存しているのだから、 自然な流れで、前面にくるといいなぁ・・・VBA API 前面 で 検索 すると、下記のサイトなどが見つかります。https://www.moug.net/tech/acvba/0020028.html 指定したウィンドウをフォアグラウンドウィ…

Excel Formから起動済みのIEを選択 テーブルを取得するテスト

…が来ました。 > 【VBA IE操作】テーブル単体を取り出す にて勉強中の老人です。 > 上記サンプルはURLを記述して表示して >WEBページにテーブルの内容を取得しておりますが、 >当方も目的はページを次から次に切り替えて >その都度にテーブルの内容をEXCLEに蓄積したいと思っ > てます。(手動で開いたページのテーブル等) と、 既存IEを手動で操作して、データを抜く、 そんな質問が来ました。前回、既存IEの取得まで行ったので、 今回は、 テストでテーブルを探し、 選…

Excel Formから起動済みのIEを選択 Bodyの値を取得するテスト

…が来ました。 > 【VBA IE操作】テーブル単体を取り出す にて勉強中の老人です。 > 上記サンプルはURLを記述して表示して >WEBページにテーブルの内容を取得しておりますが、 >当方も目的はページを次から次に切り替えて >その都度にテーブルの内容をEXCLEに蓄積したいと思っ > てます。(手動で開いたページのテーブル等) と、 既存IEを手動で操作して、データを抜く、 そんな質問が来たので、 初めの一歩として、今回は、テストで起動済みのIEを探し、 グローバル変数に…

テスト JRA単勝オッズをレース別に複数蓄積する

…ス別に複数蓄積する VBA IE操作 Ken3 ライブ プログラミング テスト中 - YouTube www.youtube.comポイントは、 単勝順のオッズを一時的に Sheets("作業用") に書き込む次に、 1.初回は、馬番 馬の名前を書き込む 2.二回目以降は、時刻とオッズを書き込む 上記をポイントに処理を行ってみたいと思います。初回のチェックは、 一枠一番の馬名が変化したかを単純にチェックしました。 あとは、単純にデータを作業用シートからレース1R..12Rにコ…

クリップボード から テキスト取得して選択セルに追記してみた

…をもらってしまった。VBA クリップボードで検索する とイロイロなページがヒットします。 ExcelのVBAで、クリップボードのデータ形式を確認する。〜パソコンの小技・備忘録 Office TANAKA - Excel VBA Tips[クリップボードを操作する(1)] クリップボードとデータのやりとりをする:Excel VBA|即効テクニック|Excel VBAを学ぶならmoug上記を参考にして、参照設定で 「Microsoft Forms 2.0 Object Libra…

JRA オッズの発表時間を取得します 蛇足で.getElementsByClassNameのテスト

… 最終オッズの判断 VBA IE操作 Ken3 ライブ プログラミング テスト中 - YouTube www.youtube.com次は、 最終オッズ や 99:99(XX時XX分) などの、 オッズの集計時間を取得してみたいと思います。1.現物の確認 レースが終了していると、 <td class="cTtl headerOdds"> 2017年7月30日(日)&nbsp;2回新潟2日&nbsp;&nbsp;<span class="headerOdds2">最終オッズ(馬番…

JRA 単勝オッズ取得 いただいた要望 開催日とレースの指定にチャレンジ

…催地とレースを指定 VBA IE操作 Ken3 ライブ プログラミング テスト中 - YouTube www.youtube.comもらった要望 ア.一つだけご教示お願いしたいことがあります。 '開催日を探す Dim strJYOBOX(10) As String Dim j As Integer '開催日のリンクをあさる j = 0 For i = 0 To objIE.Document.Links.Length - 1 '右端の"日"を条件に判断する If Right(o…

JRA オッズ取得 Click処理を共通化後 単勝オッズ人気順にチャレンジ

…しくお願いします。【VBA IE操作】JRA オッズ取得 Click処理を共通化後 単勝オッズ人気順にチャレンジ - YouTube www.youtube.com1.ドキュメントのリンク オブジェクトを押す処理を共通化.Document.Links(i) のリンクを探して押す処理を外側に出してみます。 ※サブルーチン化してみますパターン的には、 表示中のIE と 条件を渡し クリックさせる2.共通化のサブ関数ができたので、 これを使い、 人気順の単勝オッズ取得を作成してみる…

JRA 単勝オッズ取得 コードまとめ と Sleep DoEventsの違いをテスト

…Eventsの違い VBA IE操作 Ken3 ライブ プログラミング テスト中 です・・・ - YouTube www.youtube.com1.共通のコードをまとめましょう 泥縄式でコードをコピペ、 テスト 実行 修正 再テスト・・・を繰り返していると、 コードが長くなるし、 メンテもしにくいので、 共通のコードはまとめましょう。2.ページの表示待ちをまとめる リンクなどをクリックした後 必ず ページの表示を待っています、 ここを まず まとめてみます。 まとめ方は Ca…

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

…催場所のループ処理 VBA IE操作 Ken3 ライブ プログラミング テスト中 です・・・ - YouTube1.開催日を取り出す 開催日を取り出します ※日曜日は前日の土曜日があるので、 単純にはいかないけど、今回はすべて取り込む2.開催日のループを作成 12Rまで取得終了したら、 次の開催地のオッズへ移動 1Rから取得を 開催日がなくなるまで行う onclick="return doAction('/JRADB/accessO.html','pw15oli00/6D')…

Ken3 ホームページ 目次

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

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



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