三流君 ken3のmemo置き場

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

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

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

VBA

ウォッチ式の使用例として PowerPoint VBA グラデーション 色を ウォッチ式でトロイおじさんが探ってみた

結果を先に書くと、 Shape.TextFrame2.TextRange.Font.Fill.GradientStops.Item(1).Color で取得できました。 - : TextFrame2 : : TextFrame2/TextFrame2 : Module1.aaa - : TextRange : : TextRange2/TextRange2 : Module1.aaa - : Font : : Font2/Font2 : …

実行時エラー 1004 : RangeクラスのAutoFilterメソッドが失敗しました Excel VBA .AutoFilter フィルター処理を勝手にデバッグ

実行時エラー 1004 : RangeクラスのAutoFilterメソッドが失敗しました 質問元: teratail.com ↑が質問元です。※回答してから勘違いに気が付く、痛恨のパターン・・・落ち着け・・・VBAからフィルターを使ったこと無かったので、 勝手にデバッグ動画を作成 htt…

VBA PowerPoint クラスモジュールで WithEvents イベント処理 例題として スライド開始 SlideShowBegin と スライド終了 SlideShowEnd を処理

VBA PowerPoint イベント で検索すると、いろいろなページがヒットします。 今回は、下記公式の Application オブジェクトでイベントを使用する https://docs.microsoft.com/ja-jp/office/vba/powerpoint/how-to/use-events-with-the-application-object を…

ExcelからWord #データ差し込み 処理を #デバッグ してみた Excel VBA IsDate("1200-10") が True になるので小細工してみた・・・

IsDateで日付かチェック可能なのですが、 1200-12 みたいなYYYY-MMと取れる文字列を真 Trueと判断する まぁ、当たり前のお話なのかなぁ・・・なので、追加で、書式が文字列かチェックしてみたり、 置き換え前の文字に 日 が入っているか?チェックしてみたり…

XXXXXさんへ Q. IE操作 Vbaとvbsの違いについて #IE操作 #VBA #VBS #業務改善 を邪魔する #老害 ぉぃぉぃ

下記の質問 Q. をいただく Vbaを、勉強中初心者なのですが、この度質問させて頂きたいことがあり、自身では調べきれずメッセー ジさせていただきました。「内容」 Vbaとvbsの違いについてです。現在、勤め先でvbaを使用し作成したxlsmファイル(150個)を作成…

VBA PowerPoint 全てのスライドを選択しながら スライドノートを音声に変換して埋め込む #VBA #PowerPoint #ノート #音声埋め込み

またまた浮気して人力検索から teratail の質問を答えて、恥をかいてみたり・・・ (※ここまできたら、浮気じゃなくて、あっちが本命か?ぉぃぉぃ・・・)元ネタの質問ページは下記を見てください。※他の回答や質問のコードを参考にする。 teratail.com PowerP…

Word VBA ルビの情報を ActiveDocument.Fields(n).Code から探ってみた #Word #VBA #デバッグ

人力検索から浮気して teratail の質問に回答してみた。 テスト不足で、浮気先で恥をかいてしまった ぉぃぉぃ ※正確には、人力検索でもダメ回答で恥をかいていたりするんだけど・・・浮気先(質問元) teratail.com https://teratail.com/questions/j9rj56gr6h…

VBA Excelで指定した文字をWord文章中から探す 段落オブジェクト Paragraph を使用 Range.Informationで位置を取得 #VBA #Word #デバッグ #Excel

ExcelからWordの段落オブジェクトParagraphsを使用して検索文字列の位置Range.Informationを探してみました ※人力検索から浮気して teratail の質問に回答してみた。いつもの人力検索のノリなので、常連さんに怒られないか心配しつつ・・・浮気先(質問元) te…

XXXXXさんへ IEサポート終了後の VBA WEBからのデータ取得について キーワード Selenium で検索すると流行の方法がわかるかなぁ

>ExcelVBAでデータを集め、競輪予想を作っています。 ・ ・ ・ >さて最近、IEのサポート終了が告知されていますが >WEBからのデータ取得はどのような対処がベターなのでしょうか?ご意見をお聞かせください。ベター、ベスト、イロイロな考え方がありますが、…

XXXXXさんへ Excel VBA 1行単位 A列からE列 5つのデータをPowerPointの1スライド 縦に5個並べたテキストボックスにセットする

VBA

下記の質問をいただきました。 >パワーポイントのVBAを検索していたらこちらに辿り着きました。 >A列~E列までのデータを1枚のスライドの5か所のテキストボックスに流し込むにはどうしたら >いいでしょうか? >テキストボックスは上から下へ同じ大きさ…

XXXXXさんへ VBA Outlook メールの移動について .ReceivedTimeで受信時刻がわかるので.Move してみただけ

下記の質問をいただく >OUTLOOKで受信したメールで作業実施日を毎朝8時とすると >そこからからマイナス15時間から朝8時の範囲で受信したメールだけを >任意のサブフォルダーに移したいときはどのようにすればよいのでしょうか。 .ReceivedTime で受信…

Win10でExcel VBA GetPhoneticを使い フリガナ候補を全て連続で取得したいのにサンプルが正常動作しない Win7だとテストOK Win10だと次の候補を取得できない そんなテスト結果

テスト動画を冒頭に移動※先に観てもらう? https://www.youtube.com/watch?v=JoidvQb2BIE www.youtube.com ↑こんな感じの結果です。下記質問をいただいたので、テストしてみる。 Sub aaa() Dim strWORK As String '呼び出しは簡単で、調べたい文字列を渡す s…

バグ付きなので参考程度に Excel VBA アクティブシート内の表をPowerPointへコピペ(転記)する 複数の表を探す #デバッグ #バグ

www.youtube.com1.Range("B2:D5")など固定エリアをパワーポイントに貼り付けてみる https://www.youtube.com/watch?v=iMavOYyH2ac2.シート内の表を探す https://youtu.be/iMavOYyH2ac?t=3293.とりあえず、一つ表をエクセルからパワーポイントへコピー・貼り…

XXXXXさんへ VBA IE操作 confirm() とalert() 両方を消したい

VBA

下記の質問をいただきました。 WEBページからのメッセージに困っていましたが objIE.navigate "JavaScript:function confirm() { return true; }" のおかげで次に進む事が出来ました。 本当にありがとうございます。ただ次の問題が新たに発生しました。 実行…

XXXXXさんへ Q: Yahoo競馬の着順情報を取りたい A: DIV Class=XXXX を.ClassNameで取り出す テスト

' objTABLE.rows(行).cells(列) Set objCELL = objTABLE.Rows(y).Cells(x) 'これがwebの列 で取り出したデータに対して、さらに、その中から、DIVタグを取り出して、名前を調べる'DIVタグを抜き classの名前を取得してみる Set objDIVs = objCELL.getElement…

XXXXXさんへ input type="image" のボタン操作 VBA IE操作で気になったこと

下記の質問をいただいたが、回答ができなかったお話。 csvをDownloadする画面に行くのですが、 そこのボタンがJavaScriptで動くように設定されているのですが、 動かすことができません。 下記がボタンのソースです。 input type="image" name="XXXXXX_Submi…

XXXXXさんへ AccessからExcel データ転記の開始位置について

VBA

下記の質問をいただく Accessからエクセルのテンプレートへ1シート10件ごとに出力させようとしています。 件数も毎回変わります。 件数が増えるごとにテンプレートシートをコピーして増やします。(依頼書1、依頼書2・・・)「シートへデータを転記( http:…

はてなの質問に答えてみた Excel VBA セル内を改行(VBLF)で区切られた文字列のフォントを行単位で変更するテスト

こりずに はてなの質問 q.hatena.ne.jp https://q.hatena.ne.jp/1576623097 にチャレンジしてみた↑質問が載ってます。 ※他の回答やコメント含めてみてください。いつものデバッグ風景・・・ミスしまくりで恥ずかしいけど・・・ www.youtube.com https://www.…

XXXXXさんへ ie.Document.getElementsByName の件 ソース一行から、イロイロと想像してみた

下記の一行コードの質問をいただく。 >三流君さん、お久しぶりです。 >もし解読出来たら教えて頂きたい構文があります。 >ie.Document.getElementsByName(' routeSettingList[' & n & '].trafficCd').item(0) >です。もし解読出来ましたら教えて下さい その…

XXXXXさんへ IE使用時にページ移動後のHTMLDocumentを再取得 について

下記の質問をいただく。 >IE使用時にページ移動後のHTMLDocumentを再取得したいのですができません。 >ご教授いただけないでしょうか?? >IE使用時にページ移動後のHTMLDocumentを再取得 ですが、 通常は、移動後もそのまま使えるので、 ※逆に、移動前のペー…

VBA IE操作 F8ステップ実行 デバッグ風景 アクティブに注意?「中断モードでは入力できません。」

デバッグの失敗動画ですが、何かの参考となれば幸いです。 VBA IE操作 F8ステップ実行 デバッグ風景 アクティブに注意?「中断モードでは入力できません。」【三流君】 - YouTube www.youtube.com私もよく使っているのが、 デバッグモードでコードを止めて、…

XXXXXさんへ VBA IE操作 手作業で見つかるオブジェクトが見つからないパターン

デバッグ時の手作業で見つかるオブジェクトが プログラムで走らせると(実行時)見つからないパターン>> objectそのものが取得できていないエラーとなりました。 >> また、ジャバスクリプトを直接動かすほうは、実行しても、「反応しない」という状況です。…

XXXXXさんへ VBA IE操作 帳票ボタンをクリックしたい件について 妄想回答案です

やりたいこと サイトの中の、ID付与されているボタン(具体的には、「帳票」を示す、“LinkButton4”)をクリックしたい、というものです。 2.取得したいID(”LinkButton4”)が記載されている(と思われる)箇所のHTML。 (「要素の検査」を使ったら、表示された…

XXXXXさんへ IE ダイアログボックス 処理について 2019-06-20返信

VBA

当店人気のIE操作質問がくるも・・・ >ダイアログボックスが2~3回開く業務系では上記の処理がsendkeysメソッドでしかできません。 >ご存じの通りsendkeysメソッドは不安定で度々エラーが発生し業務使用するのは厳しい状況です。 >何か良い方法はあります…

Outlook VBA 受信メールを .Move 移動先Folderオブジェクトで移動させる ループに注意

処理済みのメールを他のフォルダー ここでは、受信トレイの下の 名称"処理済み"に.Move 移動先Folderオブジェクト を使って移動させました。'処理が終わったメールを移動する ※6 ループの中で移動させる時は注意する mITEM.Move oFolder.Folders("処理済み")…

エクセルのマクロ記録で写真の挿入を記録して .Pictures.Insert を探ったお話

マクロ記録で写真の挿入を探ってみます。 1.記録してみよう 開発のタブから、マクロ記録で実際の操作を記録します。下記、実際の操作と簡単な解説です。 https://www.youtube.com/watch?v=wIu31e36Qew 2.コードを見てみよう 次に記録されたコードを確認しま…

Outlook VBA 添付ファイル写真の取り出し はてなの質問にチャレンジしてみた。テストしてみた

はてなの質問 q.hatena.ne.jp にチャレンジしてみた。テストしてみた >【指定フォルダ or 指定件名を含むメールの本文内の画像をエクセルに貼り付け】 >複数人からiPhoneのメールで送られてくる画像を >1クリックでエクセルにまとめて貼り付けしたいです …

XXXXXさんへ 形の違うweb上の表・テーブル から指定された 項目・列を取得したい

下記の質問をいただく VBA IEでHP等から表をエクセルに抜き出したい場合ですが 以前に競馬の表の取り込み例として'TABLEタグを抜き 複数のテーブルをセット Set objTABLEs = objIE.document.getElementsByTagName("TABLE") '↑で代入したオブジェクトからテーブル…

XXXXXさんへ ページが変わるたびにset mi=objie.documentとしなくてもよいのでしょうか?

IEのDocumnetについておしえてください。 以下のようなプログラムいおいて、①でmiに OBJIE.documnetをいれてますが、ページが変わって miをウオッチでみると変わったページのプロパティ要素が取得されてます。これは、ページが変わる(次のリンク先を読み込…

Excel VBA A列から .Charactersで Font 色や太字を判断してHTMLタグを作成する

前回、Excel A列から文字の色や太字を判断して、HTMLタグを追加する。 そんなVBAをライブで作成して、 マクロ記録で太字のFont.Boldを探せなかったり、 追加したタグがクロスしてしまうバグ・不具合を発見しました。いつものデバッグ風景です。ライブは怖い…

Ken3 ホームページ 目次

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

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



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