三流君 ken3のmemo置き場

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

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

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

XXXXさん の検索結果:

XXXXXさんへ As PowerPoint.Seriesを探ってみては? サンプル パワポ リンク切れグラフから値を取得したい

As PowerPoint.Seriesを探ってみては? パワポ リンク切れグラフから値を取得したい ppSeries As PowerPoint.Series https://youtu.be/rBKtD3WPcXY?si=uW9IUsUDjthPADGo&t=696 ↑を見てください。 3.Values,XValuesをDebug.Print表示してみる Seriesコレクションに(系列に) データが残っているのか? 確認するために、 Values,XValuesを表示し…

A列の値が変わるまで(グループ単位で)PowerPointのテンプレにセットする 差し込み印刷もどき処 理

A列の日付が変わるまで(グループ化) 最大5件のデータを事前に用意したPowerPointひな型テンプレートにセットする。 ↑あっ、勝手に最大5件にして、あとでトラブル発生パターンを作る気満々で・・・ youtu.be https://youtu.be/tprejIA-Q-M 目次とソースコード 00:00 やりたいこと 1.要求仕様:下記の質問をいただく 00:54 2.仕様をまとめる:入力と出力を考える 02:23 3.テンプレートファイルを作成する 03:13 4.1 …

白い具材の新人さん 先輩の技術を吸収して良い味になるといいな

新人さん達も、そろそろ会社の環境に慣れてきたころかなぁ? 何か合わないので、辞めたい・退職したいとムズムズしだす頃かもしれないけど・・・個人的には、三年くらい在籍して、 自分の味・特色が出てきてから ステップアップの転職がいいなぁ・・と思うけど。。。会社の色に染まりたくないです。 https://youtube.com/shorts/EkRpQ2k58HA youtube.com #shorts #新入社員 #新社会人 #おでん #味がしみこむ #会社辞めたい #ブラック企業…

XXXXXさんへ「新卒チケット無駄にした」と言われたら?顔の見えない人たちに負けないでがんばってね

質問メッセージ、ありがとう。 私は、新人の気持ちがわからないほどのオジサンなので、 回答動画が心に響くか?わかりませんが、 ネットで言われたことなんて、気にしないで、前に進みましょう 回答動画: youtube.com新卒で就職したけど辞めました。ブラックでした。 ネットの人達から「新卒チケット無駄にして ざまあ 」と言われて悲しいです。顔の見えない人たちに言われたことを気にし過ぎたり、 言い争っても、良いことはありません。 無視しましょう。迷って決めた、この分岐(退職)が、…

パワポ ノートの英語を男声で読ませたい Gender=Maleを指定する Windows設定・音声認識から英語の声を追加する手順

GetVoices("Gender=Male;Language=409")(0)と Gender=Maleで男性声 Language=409で英語US を指定しただけのコードなんですが、、、 環境によっては男性声の追加が必要です。 そんなお話です。youtu.be https://youtu.be/3E1H-c46DZA 目次 00:00 1.やりたいこと 00:20 現在使用可能な声の名称を取得 02:21 Windows設定 音声認識から言語の追加をやってみる 05:06…

パワポ ノートを流暢な英語発音で読み上げたい時 SAPI.spVoiceで言語指定をLanguage=409にセットしてUS英語にする

パワーポイントのVBAで音声読み上げを英語で行うには? 流暢な英語発音で読み上げたい時 など、テストしてみました。下記のメッセージをいただく。 >パワポVBAで音声読み上げ&字幕を使用させて頂いています。 >大変活躍しており、感謝申し上げます。 >本題ですが、これは他言語(例:英語)で読み上げる事は可能でしょうか? >Microsoft Ziraに読ませようとしましたが上手く行きません。。。 と 質問をいただきました。 youtu.be https://youtu.be/oO…

Hatenaから送られてきた ふりかえりメール を見て、自分成長してない退化(老化・老害化)・・と感じたり。

…。 1年前の記事 XXXXXさんへ Q. IE操作 Vbaとvbsの違いについて #IE操作 #VBA #VBS #業務改善 を邪魔する #老害 ぉぃぉぃ https://ken3memo.hatenablog.com/entry/2022/02/05/013653 下記の質問 Q. をいただく Vbaを、勉強中初心者なのですが、この度質問させて頂きたいことがあり、自身では調べきれずメッセー ジさせていただきまし… 02/05 01:36に更新 Access 最適化すると削除…

XXXXXさんへ マクロでPowerPointのテキストを取得したい なら

マクロでPowerPointのテキストを取得したい なら 昔書いた記事の ken3memo.hatenablog.com が使えれば。 ※↑テキストボックスや図形に付いた文字列だけで、 表などは取得してないけど、参考になれば幸いです。リンク先のコードを転記します。 Option Explicit '起動済みの既存 パワーポイント スライド .Shapes から テキストを取り出す 'アクティブシートに名前とテキストをセット ※勝手に全クリアして書き込むので※※注意 Sub t…

XXXXXさんへ PowerPointのノート読み上げと同時に字幕っぽくテキスト文字を表示 自動ナレーションと字幕もどき

>パワーポイントノートに記入した内容をナレーションと字幕にしたい と要望をいただいたので、 マクロで作成・チャレンジしてみました。 やりたいこと イメージ図と言っても、前回作成( 2022/09/07 )のマクロ マクロ パワーポイントでノートを読み上げ PowerPoint VBA SAPI.SpVoice Speak デバッグ マクロ作り方・使い方 https://www.youtube.com/watch?v=mLUdzmReyCU に (↑音読処理 CreateObj…

XXXXXさんへ ブック間コピーについて オブジェクトを分けて作成してみました

VBA

下記の質問をいただきました 質問:ブック間コピーを行いたい 突然で申し訳ございませんが、ブック間コピーを行いたいのですが、上手くいきません。 お力添えください。よろしくお願い致します。 もしできたら、コピー元を最終行最終列を選択できるとうれしいです。 Public Function copyXLSheet_OK() 'Access から2つのBookを開きSheetをコピーする Dim MyXl As Object 'Excel.Application Dim myXLNam…

XXXXXさんへ JRA レース番号 URLの探り方 CNAME=の法則がわからなくてスミマセン

こんにちは。下記質問メッセージに回答します。 今年に入ってからJRAの画面がVBAで取れなくなりました。 ・ ・ 出馬表、オッズ、レース結果、馬情報を取得するVBAを作成し予想していました。が今できません。 ・ ・ 教えて欲しいのは strURL strPARA strHTMLの文字列切り出し検索方法です。 ソースは a href="/JRADB/accessS.html?CNAME=pw01sde1006202301061120230115/48"です レース番号の判定方法…

Outlook VBA マクロで分類 Categoriesの登録 蛇足でExcelから複数分類のセット

detail.chiebukuro.yahoo.co.jp >メールを色分けして分類するために、既存の色分類項目ではなく、 >新規作成で名前と色を設定したいと考えています。 >おそらく、Categories.Addメソッドを使用するとは思うのですが苦戦しております。 > >Categories オブジェクト (Outlook) >https://learn.microsoft.com/ja-jp/office/vba/api/outlook.categories > >Cat…

OutlookVBA メールの分類をマクロでセット MailItemの.Categoriesにセットする

図:メールの分類メールの分類は、 .Categories = "分類の文字列" に文字列で設定すると可能 分類項目 赤 など、セットすると可能みたいです。#OutlookVBA #アウトルック #デバッグ #マクロ #MailItem #Categories #ShowCategoriesDialogいつもの動画解説とソースコードを見て、アレンジしてみてください。 youtu.be https://youtu.be/R2nt09w4KyI 目次 00:00 やりたいこと 01…

Excel A列~C列,D列~F列をPowerPointスライド2枚単位でデータを作成・流し込む 蛇足で三択クイズスライド

ひな型スライド複数ページをコピーして使う Slides.Range(Array(1, 2)).Copy をテストExcelからPowerPointにデータをセットする解説動画の コメント欄に テンプレを2枚(複数)をコピーしながら、 Excel A~C,D~FをPowerPointに2枚単位でデータを流し込む、 そんな質問が書かれたので、少し探ってみます。 >パワポのテンプレを2枚以上にして、同じようなことは可能なのでしょうか? >A~Cまでを1枚目のスライド、D~Fを2枚目…

JRA三連複のオッズ取得 JRAのHPから三連複のオッズをExcelに取り込む デバッグ

ワイドと三連複のオッズを取得したい と質問があったので、 今回は、三連複のオッズ取得に挑戦してみます。下記、デバッグ動画です、うまくコードをアレンジしてみてください。 youtu.be https://youtu.be/MEOvxlcubAw 目次 00:00 挨拶と実行テスト 02:36 オッズのテーブルを判断してExcelに三連複オッズを取得 05:30 三連複の表を探す 08:45 1‐2,1‐3 などを tableのcaptionで判断 11:15 三連複のオッズをE…

XXXXXさんへ Outlook VBA 送信時にフラグのセット について

昔の記事 Outlook VBA でフラグを付ける処理 三流君VBA:Outlook VBAでフラグ作成 .FlagStatus .FlagRequest .FlagDueBy http://www.ken3.org/vba/backno/vba161.html に下記の質問をいただきました。 教えていただければと思います。 No161のフラッグ設定を既存のマクロに付け足そうとしています。(BCCで自分へのメールを付け足すマクロです) 下記がうまく働きません。 どうすればよい…

XXXXXさんへ スクレイピング関連の質問について 年金関連のqaページ

下記の質問をいただく、 (が、いつものように、できない、難しい・・・の後ろ向き回答、ぉぃぉぃ) >さてこのたび仕事の関係で某厚生労働省の年金関連のqaページをエクセルの表にして抽出したいと考えています。最低限A列にQ(質問内容)、B列に(回答内容)という感じ。質問したいことは、①これを達成することはvbaだけで可能でしょうかそれとも別のアプリケーション?やなにか別のプログラミング知識が必要でしょうか?②仮にKen3様が(その経験・知識をもってして)それを実行しようと思った場合…

パワポ スライドショー 1ページ目に乱数セット 2ページ目で設定値を使いたい PowerPoint VBA OnSlideShowPageChange

下記の質問をコメント欄でいただきました。 >PowerPointでゲームモドキを作っているものです。 >スライド1に能力設定(攻撃、防御)、ランダム関数を使った数値 >スライド2で戦闘を考えているのですが、スライド1の数値をスライド2に反映させる方法がわかりません。 サクっとカッコつけて素早く答えたかったけど、 いつものように、あのあの、手間取りました。 ぉぃぉぃ youtu.be https://youtu.be/jP0O2KlXeLE 目次 00:00 1.処理のタイミン…

XXXXXさんへ YouTubeのテキストエリアの書き出しの件 スクレイピング pythonで検索してみては? IE非推奨サイトが増えてきて寂しいなぁ

せっかく下記の質問をいただいたのに、誰でも思いつく検索ワードを紹介しただけだった・・・ >YouTubeのテキストエリアの書き出し >ご教授くださいm(_ _)m について 私の昔のサンプルだと、 VBA IE操作 例題:指定したYouTube動画から はてなブログ の本文を作成する そんな転記プログラム 今は、動作しないコードですが、 https://ken3code.hatenablog.jp/entry/2018/07/01/223940 を見て、参考になれば・・・ タ…

Excel VBA グラフ選択時のイベント処理を探る クラスモジュールにWithEvents As Chartを書きイベント取得

タイトルサムネイルWithEvents myChartClass As Chartを使い、グラフのイベントをクラスモジュールで処理する グラフ選択で軸の値を表示、ダブルクリックで修正、そんな処理を作成しました。 グラフの軸の値は、 With myChartClass.Axes(xlValue) Debug.Print "最小値.MinimumScale:" & .MinimumScale Debug.Print "最大値.MaximumScale:" & .MaximumSc…

XXXXXさんへ ExcelからPowerPoint連続設定 自動画面切り替え 秒数の設定 を Excelから連続で行う VBA マクロ デバッグ

VBA

Excel A列に切替タイミングの秒数を入力、PowerPointの画面切り替え タイミングにセットする そんな処理を行ってみます。 タイトルサムネイルYoutubeのコメント欄で下記の質問をいただきました パワーポイントの自動画面切り替えの秒数の設定において、エスセルに記入した秒数を流し込むことは可能でしょうか。 パワーポイントのスライドが600ページ✖️4セットあり、それぞれ表示する秒数がエクセルにまとめてあります。 これを手打ちしていく作業がなかなか大変なので、効率的な…

XXXXXさんへ JRA オッズ取得 ホームページ「onClick=doAction が なんでPOSTだとわかったんですか?」と質問されたので

タイトルサムネイルdoActionのコードでcommForm01に値をセットして.Submit ActionがPOSTなので、FormのPOST送信でした youtu.be https://youtu.be/NPnKju8rkVw 目次 00:00 あいさつ、はじめに 00:25 1.JRAのHPを表示させます 00:39 2.ソースを表示します 01:29 2.1 ソースの頭でjavascriptのコードがまとめてインクルード 02:02 2.2 doActionのコードを…

CreateObject("htmlfile")でDocumentを作りweb上のhtmlデータを抜き出す 例題でJRAオッズを取得してみた

タイトルとサムネイルDim oDocument As Object Set oDocument = CreateObject("htmlfile") で作成したhtmlfileドキュメントオブジェクトに html文字列を書き込む、そんなデバッグ風景です。下記、いつもの あのあの そのその 解説動画です www.youtube.com https://www.youtube.com/watch?v=RjZZUq40gxY 目次 00:00 0.IEが無くなるので CreateO…

がんばれ 新社会人 新人プログラマー くたばれ 老害 三流プログラマー YouTube新規向けのチャンネル紹介動画を作成した

…させて、就活不安のXXXXXさん へ返信転職ってこれ(キープしながら次に乗り換える)が問題なんだよなぁ 複数同時交際で合う会社を探してから決めたいなぁ(見つけてから転職、乗り換えも)読者の心の声:↑それを世間では学生の就職活動と言うのでは?インターンで判断ですKen3:少し変えて大学生の就活、モテル人は複数から即内定OKもらえていいな。 人気の無い私みたいな人は誰も相手にしてくれないし 相手が決定した人たち内定組は上から、 「もっとアピールしないと」(あかるく、元気よく、話せ…

XXXXXさんへ 志望動機をA4タテ横書き提出 の件

質問: 志望動機をA4縦置きに横書き400字程度を原稿用紙は不可で郵送しろ、 と言われたのですがWordを印刷したものでいいんでしょうか? 採用担当業務をまるっきりやったことが無い三流プログラマーが回答すると、回答: A4で印刷(Wordでも) それでいいともいますが・・・ ※私も字が汚いので、印刷かなぁ。 深読みすると、コピペで印刷だと目立たないので、 手書きでアピールするテクニックもありそうですがgoogle:志望動機 原稿用紙 をキーワードにgoogle検索下↓すると、…

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

下記の質問 Q. をいただく Vbaを、勉強中初心者なのですが、この度質問させて頂きたいことがあり、自身では調べきれずメッセー ジさせていただきました。「内容」 Vbaとvbsの違いについてです。現在、勤め先でvbaを使用し作成したxlsmファイル(150個)を作成しまし た。当該各ファイルにアクセスした際、open時イベントでieエクスプローラを操作し、それぞれのurl(4 ページ程経由、各xlsmファイルの設定ごとに、キーワードを入力したりチェックして別々のInterne…

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

>ExcelVBAでデータを集め、競輪予想を作っています。 ・ ・ ・ >さて最近、IEのサポート終了が告知されていますが >WEBからのデータ取得はどのような対処がベターなのでしょうか?ご意見をお聞かせください。ベター、ベスト、イロイロな考え方がありますが、 キーワード Selenium で検索すると流行の方法がわかるかなぁgoogle:Selenium VBA https://www.google.com/search?q=Selenium+VBA ↑で検索したりブラウザ…

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

VBA

下記の質問をいただきました。 >パワーポイントのVBAを検索していたらこちらに辿り着きました。 >A列~E列までのデータを1枚のスライドの5か所のテキストボックスに流し込むにはどうしたら >いいでしょうか? >テキストボックスは上から下へ同じ大きさのテキストボックスが5行あるような状態です。 いつもの、あのあの、そのその?が多すぎなテスト動画です https://www.youtube.com/watch?v=ZLkCiXC0FzQ www.youtube.com1.事前準備…

XXXXXさんへ エクセル 入力禁則 ドロップダウンリスト =INDIRECTの#REF!のエラーについて

Excelのドロップダウンリストのエラーで、いくら調べてもエラーを解決できないため、どうかお力を貸して下さい。例えば、以下のような表があるとします。取扱者 契約者 被保険者 A D I A E A F I A F j A D K B G K B G L B D M C H C H N上記の様な表記に対し、それぞれの列をテーブル化し、取扱者、契約者、被保険者と名前を付けました。取扱者、契約者、被保険者をそれぞれ紐付けしたいです。取扱者のドロップダウンリストは作成できたのですが(…

XXXXXさんへ VBA IE操作 Java Script サイトのクリックの方法について 質問をいただく

下記の質問をいただいたので、google検索キーワードを紹介してみます。 Java Scriptが利いているサイトのクリックの方法について google:vba ie click javascriptなどで検索すると、解決策が出てくるかなぁ。 ↑検索結果に丸投げかよ・・・ 以下、いつもの遠回しな宣伝付き回答 ぉぃぉぃ・・・1.直接起動してみるのも手かなぁ.Script.setTimeout "javascript:関数などかけるので" ページ表示を確認後、HTMLのソースを見…

Ken3 ホームページ 目次

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

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



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