三流君 ken3のmemo置き場

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

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

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

VBA の検索結果:

パワポ 1ページ目のテキストや図形を最終ページまで同じ位置にコピペする方法

…PowerPointVBA 1スライド目のシェイプ名"textbox1"をアニメーション付きでコピーして、 2スライドから最終スライドまで、同じ位置にアニメ付きで貼り付ける。 コードを教えてください。よろしくお願いします。とBing(chatGPT)に質問すると、 Sub CopyTextboxWithAnimation() 'エラーが発生します Dim sld As Slide Dim shp As Shape Dim i As Integer Set sld = Acti…

PowerPoint レーダーチャート 項目ラベルのサイズを変更 RadarAxisLabels Font Size

…jp/office/vba/api/powerpoint.chartgroup.radaraxislabels より 下記、サンプル With .Chart.ChartGroups(1) .HasRadarAxisLabels = True .RadarAxisLabels.Font.ColorIndex = 3 End With を参考にする。あとは、 .RadarAxisLabels.Font.Size とか、.Size=で変更できました。変更したソース: ' グラフを画…

実験動画 表示アウトラインでタイトルが表示されるのでタイトルを指定テキストにしたい パワポ マクロ

パワポで表示 アウトラインでタイトル部分がリンク表示されるので、変更したい 何言ってんだ?キッカケ下記知恵袋の質問でアウトライン表示が気になったので触ってみた。 detail.chiebukuro.yahoo.co.jpパワーポイントにタイトルを別テキストに設定する操作メニューが無かったので、 マクロでテキストボックスとタイトルを交換するイメージでやってみました。www.youtube.com https://www.youtube.com/live/E39o37zw-8c0…

EXCELのスライサーによる操作をVBAマクロで行いたい 蛇足で失敗したテスト

…ライサーによる操作をVBAマクロで行いたいです。 detail.chiebukuro.yahoo.co.jp とあったので、やってみました。 ※ライブでテストして、恥をかいてみた。ぉぃぉぃ。www.youtube.com https://youtube.com/live/0DmaN-DWkYI 目次 00:00 キッカケの質問を紹介 00:45 1.マクロ記録で探る 02:30 1.1 SlicerCachesから探ると良いのでは? 05:56 2.単純にonやOffじゃない…

JRA オッズ 馬連オッズ取得にチャレンジしてみた ライブで蛇足の馬単チャレンジ失敗

…Vo4. ExcelVBAで表示変更 10倍以下を赤 小数点を0.0でそろえる 例題:JRA 単勝オッズ取得 https://youtu.be/rAi_uL41Bp05. Excel 読み上げ Range(範囲).Speak で簡単にできます Application.Speech.Speakもアリかな https://www.youtube.com/watch?v=c4mH9szOo2w6. BAT タスクスケジューラ から タスクを削除 schtasks /delete /…

ExcelからPowerPointへデータセット 休日対応処理にチャレンジ デバッグしてみた

…ます。 #ExcelVBA #PowerPointVBA #テンプレート #自動セット #マクロデバッグ動画です www.youtube.com https://www.youtube.com/watch?v=mp2Mh_69fhQ前回までの再生リスト↓↓ https://www.youtube.com/watch?v=mjnqMrxk0qM&list=PL8vZhsyiiFhtDYDOdz94s6bQ54vwPRN-3&pp=gAQBiAQB ↑と、コメント欄のソースコード…

ExcelからPowerPointへ グループ化されたパワポのテンプレートに値をセットする デバッグ動画

A列の値をグループにして値をテンプレートのパワポへセット セット後jpgファイルを作成しテンプレを閉じる www.youtube.com https://www.youtube.com/watch?v=mjnqMrxk0qM 目次 00:00 1.仕様の説明 と 実行結果 02:12 2.テンプレートの作成 03:53 テキストと図形をグループ化して明細を作る 10:02 3.ExcelからPowerPointテンプレにデータを流し込む 11:12 3.2 A列の値が変化する…

Shapes GroupItems を使用して グループ化したシェイプにデータをセットする PowerPoint VBA

…PowerPointVBA #Shape #GroupItem #グループ化 #デバッグ 1.まずは、.Type タイプで判断グループの頭、グループ化したシェイプか? .Type で判断できます。If ppShp.Type = msoGroup Then 'グループ化の判断 みたいな感じで、 .Typeの値がmsoGroupかで判断可能です。2.グループ内のシェイプにたどり着く方法なんて、いってるけど、シンブルで .GroupItems に まとまっています。 これを知ってれ…

TextRange.Replaceメソッド テキストボックスに標準関数Replace関数で置換した文字をTextに戻すと装飾が外れてしまう

…PowerPointVBA #TextBox #Replace #デバッグ www.youtube.com https://www.youtube.com/watch?v=VR1V18qbZn8 目次 00:00 1.不具合の再現 TextFrame.TextRange.Text再代入をチェックする 01:55 実行結果を見せて、不具合の説明 03:28 2.TextRange.Replace メソッドがあるので、これを使うテスト 06:44 3.ReplaceALLみたいな…

Shapes.AddTextboxでテキストボックスを追加 ExcelのA列からG列をPowerPointにセット

…画です Excel VBA A列のデータを使ってPowerPointスライドを自動作成する方法【マクロ自動転記】 例題:Excel A列データをPowerPointのスライドタイトルにセット - YouTube ↑これか?これがコピペされて、悪さしていたのかなぁ・・・キレイなコード書かないとな・・・ 00:40 1.なんか、懐かしい?コードを走らせる 02:13 2.テキストボックスの追加 07:03 3.位置指定は配列で? 10:28 4.プロパティを調べたい 13:59 …

エクセルデータからパワポスライドを自動作成 テンプレート修正 差し込みテンプレートの修正手順を説明

…PowerPointVBA #テンプレート #自動作成 キーワード: パワポ,マクロ,エクセル,スライド,自動作成,テンプレート,修正,コードタイトル案: パワポマクロでエクセルデータからスライドを自動作成!テンプレート修正方法も解説 エクセルデータからパワポスライドを自動作成する方法とテンプレート修正のコツ パワポマクロでエクセルデータからスライドを自動作成する裏技!テンプレート修正方法も紹介 www.youtube.com https://www.youtube.com/…

パワポ マクロ JPG/PDF出力 Slide Export ファイル名 "pdf" エクセルからパワポのテンプレートへデータセット後 jpgやPDFを作成

…PowerPointVBA #PDF出力 #自動作成 #JPG出力 キーワード: エクセル,パワポ,自動作成,出力,jpg,pdf,修正情報YouTubeのタイトル案を3つ: エクセルからパワポに自動変換!スライドをjpgやpdfで保存する方法 視聴者の質問に答えます!エクセルデータからパワポスライドを作って画像やPDFに出力するコード エクセルとパワポの連携術!スライドの自動作成と出力 www.youtube.com https://www.youtube.com/watc…

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 …

PowerPoint VBA 箇条書き ParagraphFormat.Bulletプロパティを使ってみた

…owerPoint VBA で 箇条書きを設定したかったので、探ってみました。 ParagraphFormat.Bullet プロパティを探ってみてください。 タイトルyoutu.be https://youtu.be/iLzfaqJvCmY 目次 00:00 実行結果 00:51 0.段落オブジェクトの下 Bulletで箇条書きの設定ができそうです。 01:20 1.選択されたテキストを箇条書きにしてみた 04:49 2.Character = &H2022 を Ascにし…

パワポ 書式をコピー後、別ページの同じ位置のシェイプに適応したい Shape PickUpメソッド Applyメソッド PowerPointVBA デバッグ

…PowerPointVBA #コピペ #デバッグShape.PickUp メソッド (PowerPoint) https://learn.microsoft.com/ja-jp/office/vba/api/powerpoint.shape.pickup 図形の書式をコピーします。 コピーした書式を別の図形に適用するには、 Apply メソッドを使用します。Shape.Apply メソッド (PowerPoint) https://learn.microsoft.com/ja…

マクロ 受信したHTMLメールから予定表を作成する OutlookVBA GetInspector().WordEditorを使いコピペ処理を行ってみた

…流す#OutlookVBA #WordEditor GetInspector().WordEditor を使用したサンプル 再生リスト https://youtube.com/playlist?list=PL8vZhsyiiFhvljaFA69MFTaI9BJN43TTB ↑他のGetInspector().WordEditorを使用したソースコード・動画も参考となれば幸いです。 キッカケは、知恵袋の質問で、 detail.chiebukuro.yahoo.co.jp >Ou…

総合テスト パワポ 30枚の画像をランダム配置 フェードアウトの終了 アニメ動作付きオブジェクトの入れ替え 設定手順と動作チェック PowerPointVBA

…owerPointのVBA マクロを使用して、 30枚の画像をランダムに入れ替え配置を行ってから、 スライドショーを実行。 単体で確認したマクロコードを組合わせて総合・結合テストを行いました。www.youtube.com https://www.youtube.com/watch?v=GXY_4b0YMtU&list=PL8vZhsyiiFhuBuPzw4CrOi0ysNAyCK8VH&index=1&pp=gAQBiAQB 目次 00:00 実行結果 01:53 1.やり…

パワポ スライド内 画像表示位置を入れ替え 単純に.Left .Topで位置を入れ替えシャッフル

…PowerPointVBA Shape Name https://www.youtube.com/watch?v=YcbjdXfk94A ↑の解説とコメント欄のコードを見てください。 '選択されたシェイプに名前を付ける '入力された名前 + 連番にする '※使い方で、重複した名前が付けられるので、注意すること・・ Sub pp選択Shapeに名前プラス連番を付ける0601() If ActiveWindow.Selection.Type <> ppSelectionShape…

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

…像の名前を マクロ・VBAで使用しやすいように、 オブジェクトに名前を付ける 操作画像XXXと名前規則の指定を受ける。 www.youtube.com https://www.youtube.com/watch?v=YcbjdXfk94A 目次 00:00 やりたいこと 実行結果 01:16 1.手作業でガンバッテ名前を付ける 02:13 2.選択されたシェイプに名前+IDを付け 固有の名前にする 05:36 3.名前は連番にしてください と 追加オーダーを受ける 09:28…

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

…PowerPointVBA #アニメーション #出して消す #直前の動作と同時 #順番 #モザイク youtu.be https://youtu.be/9PNq6QRLtZ0 目次 00:00 やりたいこと、実行結果を見せます 00:43 TimeLineのMainSequenceとInteractiveSequences違い 04:25 マクロでエフェクト効果のフェードを追加 06:00 フェードをイン(開始)、アウト(終了)を切り替えたいので Effect.Exit = …

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

…PowerPointVBA #ExcelVBA youtu.be https://youtu.be/7Uw9u3CbmHY 目次 00:00 0.やりたいこと 00:28 1.簡単な仕様を考えてみます。 01:42 2.単体テスト まずは、A1のファイルを開いてみます 04:36 3.複数スライド1,2ページを新規プレゼンファイルにコピー 05:43 新規のプレゼン作成とタイトルセットを説明 07:11 A列のファイルを開いてスライド1,2をコピー貼り付け 09:37 実行時…

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.やりたいこと 00:35 2.UserFormで使ってみる 02:57 2.2 OLED…

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

…けで、 動画作成中にVBAで作らなくて良いことに気が付き・・・ また、動画録画用のPCと作成用のPCが違ったため、 マクロのセキュリティ警告が出て、動画作成を失敗したり・・一行で書くと、 実験を失敗した動画です。 失敗動画が1つでも、少しでも解決のヒントとなれば幸いです。 youtu.be https://youtu.be/CyBPqVaktGQ 目次 00:00 0.やりたいこと。パワポからパブリッシャーへ貼り付け 00:55 1.PowerPoint から Publish…

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

…owerPoint VBA マクロを使用して .Saveでファイルを上書き保存後、 .Convert2で別拡張子で保存 (マクロの.pptmをスライドショー.ppsxへ) .Presentations.Openで開き直し .Closeで別拡張子Convertしたファイルを閉じる そんな処理の流れです。 #PowerPointVBA #MS365 #デバッグ youtu.be https://youtu.be/sE0UswvpEIE 目次 00:00 0.やりたいこと 1.実行…

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

…全て抽出できるようなvbaコードが作成可能であればそちらも教えていただきたいです。 1.挿入 から オブジェクトを埋め込む挿入 オブジェクト を選択すると ※なんか、小さなアイコンだったけど どのオブジェクトを選ぶのか?と出てくるので、 Excel 関係を選んでテストしてみます。2.パワポのスライドの下 シェイプのOLE埋め込みを探ってみるFor Each objShape In objSlide.Shapes 'スライド内のシェイプ達を一つ一つあさる で、スライド内のシェイ…

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

…すんだ? Next End If Next MsgBox "終了" End Sub せっかく、ブログを覗きに来ていただいたのに、 時間を無駄にさせてしまったかなぁ・・・と思いつつ。 (※動画の後半、連続実行で、なぜか?エラーになってしまったし、 やはり元データ無しだと、無理だった・・期待を持たせてできなかったパターンが怖いのですが、 空気を読まないで)解決の糸口となれば幸いです。#PowerPointVBA #マクロ #パワーポイント #MS365 #グラフ #系列表示順変更

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

…ク情報・リンク先を VBAマクロで更新する。 youtu.be https://youtu.be/wnhVcYHxXXQ 目次 00:00 0.やりたいこと Excelリンク貼り付けのシートを更新したい 02:25 1.まずは、リンク情報の確認 LinkFormat.SourceFullName 05:42 2.リンク情報 LinkFormat.SourceFullName を書き換える 08:52 3.存在しないシート名を設定したら・・・ 13:00 4.おわりの挨拶 当て…

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

…の設定にしようと >VBAをchatGPTにお願いしました。 > >以下のものを実行しましたが、自動再生が設定されませんでした。 >ループ再生のほうがちゃんとマクロにて設定されました。 > >どこがまずいですか? >macでOSは最新、 >powerpointは16.73を使用しています。よろしくお願いいたします。 Sub AutoPlayAndLoopVideos() Dim slide As Slide Dim shp As Shape For Each slide In…

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

…PowerPointVBA #パワーポイント #マクロ #デバッグ #データ差し込み #差し込み印刷 #スライド削除0.あいさつ・キッカケ 先頭、1ページ目だけ残し、 2ページ ~ 最終ページまでを削除する。※苦肉の策?で、1ページ目をひな型 扱いにして、 ExcelからPowerPointのスライドを複数作成する。チョット、まとまっていませんが、 テスト動画作りをスタートする。1.ExcelからPowerPointに差し込み印刷っぽくデータをセットするマクロ 昨年、 Exc…

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

…PowerPointVBA #マクロ #SAPI #GetVoices #Microsoft #ms365 #Windows10 1.やりたいこと 男性の声で読み上げを行いたい・・・ と質問をみかけたので、少し調べてみました。Gender=Male; Gender=Female; をパラメーターに追加すると、可能?2.テストしてみますテストしたけど、、、動かない 笑いSpVoiceを検索すると、 MSのページ learn.microsoft.com SpVoice (SAPI…

Ken3 ホームページ 目次

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

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



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