三流君 ken3のmemo置き場

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

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

Word VBA 段落オブジェクト Paragraph マクロ記録と検索で探ったお話

VBA

www.youtube.com ↑ Word VBAを探る マクロの記録 と オブジェクトの調べ方 例題:検索した文字列の1行下に指定文字を入れる Word VBAのコードをマクロ記録から修正 - YouTube Sub Macro1() ' ' Macro1 Macro ' ' Dim n As Integer '先頭にカーソル移動 https:…

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

がんばれ 新社会人 新人プログラマー くたばれ 老害 三流プログラマー 私Ken3も ステップアップの踏み台くらいにはなりたかったなぁ (視聴者の声:今からでも遅くないぞ良い踏み台を目指せ、おじさんもがんばれ) youtu.be https://youtu.be/HCoi7KQs-14 ↑Yout…

Excel VBA で PowerPointのタイトルテキストを取得したい Shapes から テキストを取り出す

VBA

ExcelからPowerPointのテキストを取得したい 過去の記事:A列のデータをパワポへ ken3memo.hatenablog.com >これの逆(パワポのスライドタイトルをExcelへ)ってできますか? とコメントが来たので、パワポのテキストを取得してみたいと思います下記、作成した…

未解決 msoLineJoinRound 丸められた結合を指定します ってどこにあるの?

↑あっ、間違えた、先端の方ですね・・・結合は図形を折れ線とか足した時だから、この先端の丸と join は関係ないな。はずかしいけど、残しておくか・・・ 似ている質問見つけました ぉぃぉぃ teratail.comMSのページ※勘違いの結合だけど docs.microsoft.com…

Access クエリー パラメーターの入力 を わざと表示させ 条件式に使う そんな小ネタです

#Access #クエリー で 存在しないフィールド名 を 設定すると #パラメーターの入力 をしろと エラーっぽく言われる クエリーの作成ミス や SQL文の間違いなどで見かけると思います。古き良き会社員時代を思い出したので、動画にしてみました。ぉぃぉぃ・・・…

Outlook VBA 差出人を変更 別の名前にする SentOnBehalfOfName を意図せずに発見

いつものように参照設定の下記回答動画を作成、 テスト結果を確認した時に あれ?差出人が違う名前になってる? SentOnBehalfOfName を意図せずに発見→ https://youtu.be/u4sLe5J2Tms?t=80 And 落ちてたコードの拾い食い発言は面白くない(ネットにUPされてい…

Access サブフォーム 内訳レコードを親フォームのデータから作成したい DoCmd.RunSQLでINSERT INTO文を発行 その他処理のタイミングをデバッグしてみた

#Access 親フォームから INSERT INTO テーブル ( F1, F2, F3 ) values (1,2,3) の SQL を作り、 #サブフォーム で使用する子テーブルデータを作成処理のタイミング、イベントのタイミング を 迷いながら #デバッグ する姿を笑ってください・・・youtu.be htt…

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

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

複数ファイルをドラッグAndドロップでvbsへ投げ Excelでファイル名一覧 や Wordに複数画像ファイルの貼り付け VBSのコマンドライン引数 Arguments を利用

VBS

VBS の コマンドライン引数 Arguments を使用して ドラッグAndドロップ されたファイル名を取得して、 Excelへ単純に書き込んだだけです。www.youtube.com https://www.youtube.com/watch?v=fH0F3vC3qpU ↑いつもの、あのあの、解説動画・・・ 00:00 挨拶 00:…

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

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

YouTubeメンバーシップの申請をしてみた 月290円,490円,2990円で申請中

月額 290円 490円 2990円 で、YouTubeメンバーシップを申請してみた。ひと月 290円 一日10円 ハンバーガー1個 150円缶コーヒーX2本 490円 少し足すとアマゾンプライムに入れるじゃん・・・ 2990円 1日100円、ぉぃぉぃネットフリックスより高いじゃないか?…

Access クエリでテーブルを別名(AS 別名)使用して 同じテーブルをつなげる そんなクエリーを作成してみた

知恵袋の質問にAccessのおもしろそうな質問があったので、回答してみた。 detail.chiebukuro.yahoo.co.jp ↑他の回答者がサクッとSQL文を載せているので、他の回答も参考にしてみてください。DATAテーブル NO,MOJI 0001, A 0001, B 0002, B 0003, A 0004, C 0…

Access ルックアップフィールドから作成したコンボボックスに .Text プロパティがあるのでテストしてみた

Access ルックアップフィールドから作成したコンボボックスで遊んでます .Text プロパティがあるのでテストひとつフォームにテキストボックス作成して =[コンボボックス].Text とやってみた。いつもの失敗動画は下記 https://youtu.be/zItJDyWFIuE結果は、お…

Access ルックアップフィールド から作られた 複数選択コンボボックス? の選択数を知り 条件付書式で使用したい

知恵袋の質問 https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q13258769148 Microsoft Accessについて、 関連付けられた複数選択のコンボボックスとテキストボックスがあり、 そのコンボボックスの選択数によって条件付き書式で テキストボック…

今回も小細工 Access UNION ALL でつなげたクエリをcsv出力してみた 同名フィールドのクエリが作れなかったので強引にヘッダを追加して出力

知恵袋の質問 https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q11258679736 Accessのクエリよりcsvを出力したいのですが、同じフィールド名を出力する方法を教えてください。 初心者なので簡単な方法だと助かります。 例)テーブル名=sample・…

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

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

質問: 志望動機をA4縦置きに横書き400字程度を原稿用紙は不可で郵送しろ、 と言われたのですがWordを印刷したものでいいんでしょうか? 採用担当業務をまるっきりやったことが無い三流プログラマーが回答すると、回答: A4で印刷(Wordでも) それでいいともい…

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

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

Access 最適化すると削除されたオートナンバー型のフィールド値が戻る場合がある 最適化するとID が調整される?ウソつくなよ > じゃやってみますか・・・とムキになる老害(笑)

Access テーブルで削除されたオートナンバー型の値が戻る? (正確には、最適化を行うと オートナンバーの値が戻るです。普通に使っていると戻りません) うそのようなホントの話なので動画にしてみました。 ID など オートナンバー型のフィールドを作成すると…

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

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

Access レコードソースで定数を使いたかったので 標準モジュールで固定の値を返す関数 Function を作り、定数・パラメーターっぽく使う

フォームのレコードソースで標準モジュールに書いた値(定数)を使いたかった、そんなお話です。QAサイトで回答し恥を残す・・・ 質問元は https://teratail.com/questions/9v56md6ntxp3dz で回答してみました。またまた、浮気して・・・ ※他の回答やコメント…

町田市のワクチン予約 で少しハマった話 2000e201:この接種券番号は、すでに他の接種券番号で予約処理が行われています。

親の知り合いから頼まれ、予約を取ろうとするとエラー・・・ 原因は、1,2回目に夫婦二人分を同時に予約、私が片方の人から予約を取ろうとしたためでした。例)1,2回目 電話で予約したご夫婦二人組が居ました 接種番号は当然二人別々に振られてます。 旦那さん…

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 の質問に回答してみた。いつもの人力検索のノリなので、常連さんに怒られないか心配しつつ・・・浮気先(質問元) ht…

Youtube コメント欄で半角 < > が使えるようになった?でも動画の概要・説明欄では まだ無理だった

ソースコードをUPするときに If a > 10 など、大なり、小なり、 半角が少し前まで、使えなかった記憶があって、 いつも > と全角で変換して書いていたが、 間違ってコピペした引用文章がそのまま貼り付いたので実験 ↑おっ、できますね。やったぁ、と、喜ん…

古いPCでもWindows11にUpdateしたい層に希望?いやいや?TPM 2.0チェックを回避してWindows 11をインストールする方法 の記事を見て検索してみた

下記の記事を見て、Microsoft、TPM 2.0チェックを回避してWindows 11をインストールする方法を公開 https://pc.watch.impress.co.jp/docs/news/1356709.html pc.watch.impress.co.jp ただし、TPM 2.0およびシステムの搭載CPUのチェックこそ回避できるが、こ…

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

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

検証用に 中古 Windows11 PC を探す、第8世代のCPUはそこそこの値段かなぁ?10/5以降の Windwos11 新製品と中古価格 動きに注目かなぁ

10/5 の Windows11 スタートに向けて? 検証用に中古のPC Windows11が動作するPCを探す。楽天で 中古 Windows11 PC https://search.rakuten.co.jp/search/mall/%E4%B8%AD%E5%8F%A4+Windows11+PC/?s=2 を探すと、 第8世代のCPU が多いので、中古 第8世代 PC h…

iOS15 + スマホゲームタイトル(ドラクエウォーク) で アクセスアップを狙う 釣った結果?

iOS15がリリースされたので、気になる単語iOS15 ゲームタイトル 不具合 や バグ を キーワードにしてブログ記事を書き、twitterに投稿してみた。結果は一日で、657回見られて、11回のアクションがありました。 サムネイルやツイート内容を工夫すれば、もっと…

Ken3 ホームページ 目次

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



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