三流君 ken3のmemo置き場

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

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

VBA の検索結果:

デバッグ JRA HP表示変更で単勝オッズの取り込みに失敗 F12で要素を確認して修正する

…Excel2016 VBA IE表の取り込み - YouTube www.youtube.com一つでもデバッグ時の参考となれば幸いです。修正したExcel2016のブックを http://ie.vba-ken3.jp/test/20181209.zip ↑からダウンロードして遊んでみてください。 Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'IEオブジェクトを受け取り、表示を待つ Sub I…

にしむくさむらい 月末最終日 日付の判断 西向く侍(士)って何?知ってた?

…から-1(前日)が2018年12月の末また、意味不明なこと書いたけど、 4.1 復習 Excelで日付-1をテストしてみよう 4.1.1 2018/1/1 ~ 2018/12/1 をオートフィルで入力してみて 4.1.2 =来月の日付-1 の計算式を入れてみて 4.1.3 表示形式の練習、表示形式をddにしてみて考えながら解説予定を書いていたら、長くなったので、 VBAの日付関数はまた今度ぉぃぉぃ ※今度時間がある時に飲みに行きましょう・・・と同じで、いつになるやら ぉぃぉぃ

XXXXXさんへ Excel VBA セルに書き込み時にLISTBOXのChangeイベントが発生について

…た。朝からデバッグ VBA Excel UserForm リストボックスのイベントについて実験する・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com1.質問の理解 ユーザフォーム(テキストBOX)からセルに書き込みを行う際、listboxのChangeイベントが発 生しうまく値を書き換えることができません。(値の変更をフォームより行いたいのですが、セルに書き込み時 にLISTBOXのChangeイベント…

XXXXXさんへ Excel VBA Asc関数 Chr関数 Offsetを使った泥縄デバッグ実演 仕様変更?追加依頼された時

Excel VBAでAsc関数 Chr関数 Offsetを使って 処理を変更してみました。前回作成のサンプル ken3memo.hatenablog.com に追加の要望がきました。追加の要望: 前回の質問時は満足していたのですが 本日色々と試してみると ランダム数値の区分がグループ分けした後 確認できればと思ってしまいました 後出しですみませんが、 引き続きご教示よろしくお願いします 【問題】 班 人数 A 20 B 15 C 8 D 90 E 16 【答え】 班 人数 1…

XXXXXさんへ Excel VBA 質問にチャレンジ。デバッグ F8でステップ実行したり

…した。 質問ですが、VBAで数値の足し算をしたいと思います。 内容は A列に上から 20 15 8 90 16 とランダムに配列した数値を上から順に足し算していくのですが、ある一定の数値(33とします)になるくくりで数値を出していきます 説明がうまくできませんが、33人乗りのジェットコースターが来た時に、グループ毎にいる人たち(20人のグループ.15人のグループ.8人のグループ…)が乗るのを待っている時に、順番に乗り込んでいきますが、常に33人乗り満杯で発進したい場合 グルー…

Excel VBA Worksheet_Changeイベント内でセルを変更すると再度Changeイベントが発生する

…と、苦しまないようになると思います。 ※.Column <> 5で列をチェックテスト・蛇足の解説してみました デバッグ Excel VBA Worksheet_Changeイベントでシート内容を書き換えると再度Changeイベントが発生する - YouTube www.youtube.com お時間のある時に見て、笑ってください。 うまく修正できることを願いつつ、失礼します。 ※恥の上塗り、再度の不具合が無いことを願いつつ・・・Excelさん、みなさん、ごめんね・・・ぉぃぉぃ

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でテストしたブックを保存しました

…http://ie.vba-ken3.jp/test/20170820.zip に保存しました。アレンジして使ってみてください。コードだけで、動くブックを保存していなくてすみませんでした。 次回から、あるていどまとまったら、ブックを公開してみようと思います。 ken3memo.hatenablog.com ken3memo.hatenablog.com 2017 JRA 単勝オッズをExcelへ取り込むVBA - YouTube www.youtube.com要望には、すべて…

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

…http://ie.vba-ken3.jp/test/Book20170809.zip に保存しました。アレンジして使ってみてください。1.なぜ知らなかったんだ?※三流だから? Excel UserForm Mode モードレス について https://www.youtube.com/watch?v=xoQ6G87wRic www.youtube.comExcel UserForm モード で検索すると、 UserForm1.Show vbModeless なんて、コードが…

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にコ…

Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。
・[Excel/Access VBA]の解説
・[ASP(Active Server Pages)]の解説。
・[元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
・[プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
三流君を踏み台にする
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。



Googleを使用して検索する

読者の声:三流君の説明・解説じゃ よくわからなかったから、Googleを使って、自分で検索します。
三流君:残念です。あっ、下記にGoogleの検索窓を設置しました。
いろいろ指定して試してみてください。

Google
探す言葉:気になる単語や,オブジェクト(Document),プロパティ(.Busy)やメソッド(.Navigate)などを入れて検索してみてください。


言語を指定:見つからない時は指定無しで探す

サイト指定:人気QAサイト や 一次情報MS本家を指定する
一次情報・二次情報まとめから探る
QAサイトの質問から探る
検索実行: ←オプション確認後に検索ボタンを押してください

期間指定:情報の鮮度も大切?
検索実行: ←オプション確認後に検索ボタンを押してください


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