三流君 ken3のmemo置き場

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

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

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

XXXXさん の検索結果:

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

朝からデバッグ Excel リストボックスのイベントについて実験したみた。朝からデバッグ VBA Excel UserForm リストボックスのイベントについて実験する・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com1.質問の理解 ユーザフォーム(テキストBOX)からセルに書き込みを行う際、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人のグループ…)が乗るのを待っている時に、順番に乗り込んでいきますが、常…

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

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

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

>Outlookでファイルを添付する件で送信先を固定せずにアドレス帳から任意に選択することは可能でしょうか?アドレス関係は軽く追加とかしか、やったことはないのですが、VBA Outlook アドレス帳 連絡先選択 で検索すると、 https://qiita.com/Q11Q/items/c5ae5cbc1744905f3288 https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/display-names-fro…

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単勝取り込みサンプルプログラムの作りが悪くご迷惑をおかけしてスミマセン。

下記の質問をいただく 単勝オッズの取得20170820.xlsmを回答して実行しましたが、動きません。 MENUシートのB2に入れた、「2回新潟9日 リンクが見つかりませんでした」 のMSGBOXが出てオッズを取得できません。こちらの環境はExecl 2013です。もう一つのサンプルで、「三流君VBAでIEのリンクを操作 Document.Linksを探る」 試したのですが、JRAのHBのリンク数は13個でした。JRA側が2017/08から何か変更したのでしょうか? 私のサン…

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

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

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

私も苦戦してますね・・・できたぁ・・の報告じゃなくてスミマセン。Outlook オブジェクト モデルでルールを管理する https://msdn.microsoft.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…

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

例)Outlook2016 自動仕分けで旧機能 アプリケーションの起動 スクリプトの実行を使用したい時にレジストリを設定するOutlook2016の自動仕分けで 過去のバージョンにあった アプリケーションの起動 や スクリプトの実行 を設定したいときは(選択を出したかったので) レジストリをいじってみます。 【Outlook2016】自動仕分けで旧機能 アプリケーションの起動 スクリプトの実行を使用したい時にレジストリを設定する【三流君】 - YouTube www.yout…

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

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

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

私のサンプルを改造した視聴者様から下記の質問をいただいたので、 チャレンジしてみたいと思います。土曜日のレース中にテストチャレンジ 下記のグダグダ修正を笑ってくださいね。 JRA サイトから レース結果をExcelに取り込む・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com 下記の質問をいただきました。 JRAのオッズ取り込みを改造して レース結果を取り込むことにチャレンジしていますが 中々、思うように…

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 = …

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

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

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

Outlook 予定表 分類を探りたかったので、Outlook 予定 https://msdn.microsoft.com/ja-jp/library/cc446751.aspx のプロパティから分類 カテゴリー?なんてプロパティがあるので、AppointmentItem.Categories プロパティ (Outlook) https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/appointmentitem-ca…

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

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

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

こんにちは。>投票メニューで開催競馬場を選択するselectタグです。 <select class="block-m-ls ng-pristine ng-valid ng-not-empty ng-touched" aria-invalid="false" ng-change="vm.changeCourse()" ng-model="vm.oSelectedCourse" ng-options="oHeldGuide.course.name + '(' + oHeldGui…

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

IE操作で下記の質問をいただく >今、壁にぶつかったのが >「******確認」のボタンをクリックすると >「Web ページからのメッセージ」 >が出て、その後のプログラムが全く走りません。 >「非同期」等の記事を読ませてもらいましたが、私には難解で先に進めません。 >何卒解決のヒントをご教示していただけないでしょうか。 ↓いつもの酔っ払い解説動画・・・ www.youtube.com 【VBA IE操作】Javascriptのalert「Webページからのメッセージ」を消す…

XXXXXさんへ twitter DMメッセージを送れない設定ですみませんでした。

XXXXXさんへ メールで送れないなら、twitter DMメッセージを~と書きましたが、 こちらの設定ミス(初期状態のままで) で フォロー以外のユーザから送れないようになっていたみたいで、 スミマセンでした。 現在、設定を変えたので再度試してみてください。ダイレクトメッセージ ☑すべてのユーザーからダイレクトメッセージを受信する に変更してみた。 XXXXさんへメッセージを送れない設定ですみませんでした。ダイレクトメッセージ ☑すべてのユーザーからダイレクトメッセージを受…

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

下記の質問をHPよりいただきました。 ※改行位置、文章一部変更 >現在、EXCELの横棒グラフを駆使して、 >生産の進捗具合を管理するガントチャート風を作ろうとしております。 > >そこで考えましたのは、人間がセルに数値を入力するのではなく、 >予め用意された横棒グラフのその中の1つの横棒をクリックして、 > >これも予め用意したユーザーフォームのボタンをクリックすると >その横棒グラフが伸びたり、縮んだり、 >左右に動いたりするようにしようと思いました。 > >そこで、SE…

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

XXXXXさんへ 熱い、紹介、転載不可の メッセージありがとう。JRAオッズ取得の テストで使用したExcelブックを test/20170820.zip に保存しました。アレンジして使ってみてください。コードだけで、動くブックを保存していなくてすみませんでした。 次回から、あるていどまとまったら、ブックを公開してみようと思います。 ken3memo.hatenablog.com ken3memo.hatenablog.com 2017 JRA 単勝オッズをExcelへ取り込…

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

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

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

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

XXXXXさんへ If TypeName(objWindow.document) = "HTMLDocument" のチェックを残してみては?

下記の質問をいただきました。 JRAのホームページをボタンを押しながら画面を切り替えていこうとおもい、 次のken3の方法で実行しましたが、Title名がどのページも同じで、うまく切り替わってくれません。 そこで、「****」以下の方法でbodyから一意の文字列検索をしようとしましたが 「strTemp = objWindow.document.body.innertext」部分でエラーとなります。 各ページのTitle名が同じ場合の画面の切り替えについて、教えてください。'…

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

…るのかなあ ぉぃぉぃ 実力者が気持ちよく 活躍できる QAサイトがあるといいのかな?なんてね。 ※おっと、人力検索があるじゃないか・・・VBA Outlook 予定表 日本語のページ https://msdn.microsoft.com/ja-jp/library/office/ff869026.aspx も 参考にしてみてください。XXXXXさんへ 今度は直接 ブログにコメントに書いてくれればいいのになんて。 ※書き込み ありがとうございます。助かります。勉強になりました。

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

下記のような質問が来たので、処理してみます いつも大変お世話になっております。 マクロ(VBA)で追加する予定を、非公開設定にしたいのです。 2週間あちこちwebを検索しましたが、 どのプロパティ(?)に何をセットすればいいのか、 まだわかりません。ご教示願えませんでしょうか。 以上、よろしくお願い致します。 こんにちは。 .Sensitivity = olPrivate 'olPrivate=2 非公開 プライベート で目的の処理になるとよいのですが。 Dim aITEM …

XXXXXさんへ もしかしてKB4022168 適用後にIE不具合なら

データの自動取得中、 Windows7のIEが強制終了 停止 クラッシュ の 件ですが、 もしかして、先月末に公開された 更新プログラム KB4022168 適用なら 更新後に Win7でIEが強制終了 停止 クラッシュする現象が発生するみたいなので、 試しに更新プログラムをアンインストールしてテストしてみては?私が行ったテスト 更新プログラム KB4022168 適用後に手動でページを見てみると、【テスト】KB4022168 適用後 Win7でIEが強制終了 停止 クラッシ…

XXXXXさんへ 価格ドットcom で 証明書 エラー ? の 件

価格ドットcom で 証明書 エラー ? で 昔作成したIEの自動巡回ができない と 連絡をいただく。こちらでは再現性がない・・・ もしかして、自動巡回中に最新ウイルスにやられちゃったのかなぁ??あっ、似ているのが ken3memo.hatenablog.com ↑みたいに、変な広告が悪さしているのかなぁ?それとも、 迷惑な 連続アクセスに対して、 わざと違う期限切れの証明書を食わせている・・ な わけ 無いか明日、またチェックしてみます。。。。

XXXXXさんへ 最近レスポンスが遅かったり、対応できなくてスミマセン

ありがたいことに、最近ポツポツと質問のメッセージや書き込みをいただきます。ですが、 レスポンスが遅かったり、対応できなくてスミマセンよくいただく質問が IE操作で ポップアップのOKボタンを押す方法 と JRA 本家のページから オッズを取得したい上記二つが特に多いですあとは、 あまりやったことがないOutlookの質問が比較的 多いかなIE操作で ポップアップ OK は APIの PostMessageA FindWindow で探す方法など、 私は詳しくなくて、 適切なア…

Ken3 ホームページ 目次

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

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



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