三流君 ken3のmemo置き場

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

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

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

VBA

パワポ 選択されたオブジェクト・シェイプに名前を付ける PowerPointVBA Shape Name

PowerPoint Shape.Name を使用して名前を付ける。 Shape.ID をプラス、連番をShape.Nameにセットしたり。 同じ名前が許される不思議???事前準備として、 パワーポイントで設置したオブジェクトに対して、 名前を付ける、名前を付け直す。 そんな処理をマ…

パワポ アニメ フェードアウト 終了のアニメーションを連続セット TimeLineのMainSequenceと InteractiveSequences違いなどをデバッグ解説

終了、フェードアウトのアニメーションを複数の図形・シェイプに連続でセットする。 パワーポイントのアニメを設置するマクロコードの紹介と解説です。 タイルで隠す?アニメーションの終了・フェードで消す#PowerPointVBA #アニメーション #出して消す #直…

パワポの複数スライドをExcelマクロを使用して1つにする ExcelのA列に入力したファイル名リストを使用してPowerPointのスライドを合体させる

複数のパワポ.pptxファイルを1つのファイルにまとめたい。 A列に複数のファイル名 この複数パワポを一つにまとめるExcelマクロを使用して、 A列に入力したPowerPointファイルを開き、一つにまとめてみました。 実験動画です。コードをアレンジして使ってみ…

Excel VBA ListViewの設置方法 使用例:Drag And Dropでファイル名を受け取り サンプルコード

ExcelのUserFormとSheetに ListViewを設置して、 Drag And Drop でファイル名を受け取ってみた。 OLEDragDropを使ってみた ListView1.OLEDropMode = ccOLEDropManual www.youtube.com https://www.youtube.com/watch?v=Z9b5dXKVKzE 目次 00:00 0.やりたいこ…

パワポからパブリッシャーへ貼り付け VBAでPowerPointからCreateObject("Publisher.Application")

パワポからパブリッシャーへ貼り付けを実験したです。 CreateObject("Publisher.Application") が使えたことにビックリしただけで、 動画作成中にVBAで作らなくて良いことに気が付き・・・ また、動画録画用のPCと作成用のPCが違ったため、 マクロのセキュリ…

PowerPoint マクロ拡張子のpptmをConvert2を使用して別拡張子ppsxスライドショーに変更して保存する

PowerPoint VBA マクロを使用して .Saveでファイルを上書き保存後、 .Convert2で別拡張子で保存 (マクロの.pptmをスライドショー.ppsxへ) .Presentations.Openで開き直し .Closeで別拡張子Convertしたファイルを閉じる そんな処理の流れです。 #PowerPointVB…

パワポに埋め込まれたOLE型のExcelシートを探る OLEFormatのProgIDやObjectを使用する

パワポに埋め込まれたOLE型のExcelシート Shape.OLEFormat.ProgID = Excel.Sheet.12 など埋め込み型を吸い上げて別ファイルに保存する処理を探ってみた。 youtu.be https://youtu.be/-GFfMCoBXAQ 目次 00:00 0.キッカケは知恵袋の質問 00:14 1.挿入 から オ…

PowerPoint リンク切れグラフの表示順をマクロSeries.PlotOrderで変更するテスト デバッグ

PowerPointのスライドにExcelから貼り付けたグラフ ※リンク切れでデータが編集できない> の表示順を変えたくて、 マクロで Series.PlotOrder = 1を使用したテスト動画 youtu.be https://youtu.be/aSQeb7JyBs4 です。 ※リンク切れグラフの処理で参考となれば…

パワポ LinkFormat.SourceFullName リンクしたエクセルシートのシート名を変更 マクロで複数変更・更新したい PowerPoint VBA

Excelのシートをリンクして作成しているプレゼンがあります そのExcelシートのリンク情報・リンク先を VBAマクロで更新する。 youtu.be https://youtu.be/wnhVcYHxXXQ 目次 00:00 0.やりたいこと Excelリンク貼り付けのシートを更新したい 02:25 1.まずは、…

パワーポイント マクロでスライド内の設置済み動画に対してループ再生するアニメーション設定 AnimationOrder=0で先頭ほか

パワーポイント マクロで動画の自動再生+ループ再生を設定する 貼り付け済みの動画アイテム ppMediaTypeMovie に対して、 マクロで自動再生+ループ再生のアニメ設定 AnimationSettings を行う。0.やりたいこと テスト知恵袋の質問をデバッグ、テストしてみ…

PowerPoint VBA スライドの削除 Presentation Slides Delete と Excel to PowerPointの差し込み印刷もどき処理

ActivePresentation.Slides(p).Delete でpページ目のスライドを削除することができます。 昨年作成した Excel to PowerPointの差し込み印刷もどき処理 ken3memo.hatenablog.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.やりたいこ…

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

パワーポイントのVBAで音声読み上げを英語で行うには? 流暢な英語発音で読み上げたい時 など、テストしてみました。下記のメッセージをいただく。 >パワポVBAで音声読み上げ&字幕を使用させて頂いています。 >大変活躍しており、感謝申し上げます。 >本…

PowerPoint テキストや図形の位置LeftとTopをExcelシートへ シートの座標修正後に再度パワポに戻し位置を移動させる手順を解説

単純にシェイプの Shape.Leftと.Topを取得してシートに書き出す。 次に、逆のシートの値をパワポのShape.Leftと.Topにセットして、 移動っぽく処理しただけです。 大量テキストや図形の移動処理のヒントとなれば幸いです。 youtu.be https://youtu.be/zYczLG…

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

マクロでPowerPointのテキストを取得したい なら 昔書いた記事の ken3memo.hatenablog.com が使えれば。 ※↑テキストボックスや図形に付いた文字列だけで、 表などは取得してないけど、参考になれば幸いです。リンク先のコードを転記します。 Option Explicit…

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

>パワーポイントノートに記入した内容をナレーションと字幕にしたい と要望をいただいたので、 マクロで作成・チャレンジしてみました。 やりたいこと イメージ図と言っても、前回作成( 2022/09/07 )のマクロ マクロ パワーポイントでノートを読み上げ Power…

実行時エラー2046 が 発生する件をテスト Access VBA DoCmd.RunCommand acCmdWindowHide

DoCmd.RunCommand acCmdWindowHide で 実行時エラー '2046': 実行時エラー '2046': コマンドまたはアクション'ウインドウを表示しない'は無効です。 が発生した件をテストしてみた。キッカケは下記の質問です detail.chiebukuro.yahoo.co.jp回答・テスト結果…

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

VBA

下記の質問をいただきました 質問:ブック間コピーを行いたい 突然で申し訳ございませんが、ブック間コピーを行いたいのですが、上手くいきません。 お力添えください。よろしくお願い致します。 もしできたら、コピー元を最終行最終列を選択できるとうれしい…

マクロ パワポ 複数のテキスト・図形にアニメを設定 直前の操作と同時 TimeLineにAddEffectでアニメを追加後 Effect.Timingを設定する

パワポのアニメ設定を追加するには、 Dim objTimeLine As PowerPoint.TimeLine 'タイムラインって日本語だと?何だろう? Set objTimeLine = objSLD.TimeLine 'スライドの下にタイムラインがあります '↑このタイムラインにアニメ効果を追加していくイメージ…

マクロ パワポのExcelリンクを現在の場所に更新したい Shape.LinkFormat.SourceFullNameを現在位置に更新する

マクロ・VBAでリンク情報 Shape.LinkFormat.SourceFullName を現在位置に更新する パワポのExcelリンクを現在の場所に自動更新したい ペアで同じ位置にコピペしたのにリンク先がコピー前の位置なので自動変更したい リンク貼り付けされたパスマクロ パワポの…

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

detail.chiebukuro.yahoo.co.jp >メールを色分けして分類するために、既存の色分類項目ではなく、 >新規作成で名前と色を設定したいと考えています。 >おそらく、Categories.Addメソッドを使用するとは思うのですが苦戦しております。 > >Categories オ…

VBA Excelから起動したAccess.Applicationを残したい .UserControl = Trueを実験してみた

accApp.UserControl = True を入れてテストしてみました。 ※よし実験終了、QAサイトの回答に得意気に書こうとしたら、 質問が解決済みになっていたのは内緒です。youtu.be https://youtu.be/qyL7ozYEds0 目次 00:00 やりたいこと 00:30 1.不具合の再現 01:28…

Outlook VBA 連絡先グループをメールのCC宛先にセットしたい Recipientを使用

図1:CCにグループ化した宛先をセットメールの宛先にグループ化された宛先を使用したかったので、 Dim oRecipient As Recipient Set oRecipient = objMAIL.Recipients.Add("宛先のグループ名") を使用したデバッグ・テストです。後半の自分語りで恥をかく・・…

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

図:メールの分類メールの分類は、 .Categories = "分類の文字列" に文字列で設定すると可能 分類項目 赤 など、セットすると可能みたいです。#OutlookVBA #アウトルック #デバッグ #マクロ #MailItem #Categories #ShowCategoriesDialogいつもの動画解説とソ…

メモ 行や列 の 全体選択後に右クリックやダブルクリックされた時はTarget.Countで件数もみたほうがいいのかなぁ・・・

Excelのシートイベントで 行や列 の 全体選択後に 右クリックやダブルクリックされた時は Target.Countで件数もみたほうがいいのかなぁ・・・ 6行目を選択後に右クリックでTarget.AddressとTarget.Countイベント処理で ByVal Target As Range で対象がわかる…

Excelからテンプレ・ひな型のPowerPointを開き B列のデータセット後 A列の名前を付けて保存する そんなテスト

B2のパワポファイル、フルパスを開き、B3で指定したスライドページの B4名前のテキストボックスにB10列~データセット後、A10列の名前で上書き保存する 図1.シートイメージまぁ、↑シートイメージを見た方が早いですね。テスト動画 youtu.be https://youtu.be…

WordVBA マクロ 表の行挿入と日時セットをデバッグ 表 Table 行 Row セル Cell

Word表を操作するマクロでRows.Addで行挿入後、 案1 Row.Cells(1) で 1列目だけ使用する 案2 固定のCell(2,1)にセット をテストしてみました。#MSWord #マクロ #WordVBA #デバッグキッカケは知恵袋の質問 detail.chiebukuro.yahoo.co.jp をデバッグしてみま…

VBA Wordマクロ 文字単位で処理 Word.Document.Characters 例題:丸数字の振り直し

知恵袋の質問 detail.chiebukuro.yahoo.co.jp >ワード文書内に①①②③③・・・がある場合に、 >これらを①②③④⑤・・・というふうに重複したものを順番に置き換える >マクロを考えております。 >(①②③・・・は行頭にあるとは限らないので、ワード本来の機能(段落…

Word VBA Find.Executeで検索実行 Range.HighlightColorIndexで色の変更 マクロ記録コードの修正

Wordのマクロ記録で検索条件と色変更を作り実行するが、反応しないそんな質問があったので、 おじさんが手作業で Find.Execute を足してデバッグしてみたら・・・ そんなお話です・・・って、どんな話だよ・・・ #WordVBA #マクロ記録 #デバッグ #Selection …

Excel表(セル範囲) を パワポの表TABLEへ転記する PowerPoint Table Row Column Cell VBA

0.やりたいこと Excelシート+セル範囲のテキストデータ を パワポのPage指定した表TABLEへ転記する。 ※データを流し込む、差し込む、イメージですyoutu.be https://youtu.be/x68nZfCgFGc 目次 00:00 0.やりたいこと 00:58 1.シートのセル範囲をパワポの指定P…

Ken3 ホームページ 目次

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

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



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