PowerPoint VBAで複数スライドの書式を一括変更する方法 PowerPointで資料を作成する際、複数のスライドに同じ書式を設定したい場面はよくありますよね。しかし、手作業で一つずつ書式をコピー＆ペーストしていくのは、非常に面倒で時間がかかります。 そこ…
PowerPoint VBAでOLE埋め込みWordにルビを振る方法 概要 PowerPointに埋め込まれたWord文書にルビを振るには、PowerPointとWordを連携させる必要があります。 このVBAマクロは、ExcelからPowerPointを操作し、スライド内のOLE型のWordオブジェクトにルビを振…
ListViewにファイルをドロップして、A列へ A列をクリア後、受け取ったファイル名を書き込む ソースコード: Private Sub ListView1_OLEDragDrop(Data As MSComctlLib.DataObject, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Si…
グラフオブジェクトの画像出力を探る 設置方法は、 https://youtu.be/MPmTub_ECmI?si=m-SX4A4oouNsy_vz&t=1734 ↑を2倍速で見てください。いつものマクロ記録で記録後 オブジェクトを探る 操作を記録する Sub Macro1() ' ' Macro1 Macro ' ' Range("E2").Sele…
あとで、解説を書く まず、コードを質問者さんへ送るソースコード: Option Explicit '起動済みの既存 パワーポイントのスライドから 'パワポのシェイプ情報をexcelシートへ書き出す 'ex:新規ブックを追加して、pp:スライドの情報をex:シート単位で貼り付ける…
Option Explicit '起動済みの既存 パワーポイント スライド .Shapes から テキストを取り出す 'アクティブシートに名前とテキストをセット Sub test20220915ppスライド内シェイプ名取得() Dim ppApp As Object 'As PowerPoint.Application Set ppApp = Nothi…
ActiveChart.SeriesCollection.Count で グラフ系列の数 ActiveChart.SeriesCollection.Count よく見かける .Count でChartのSeries数がわかりそうです Option Explicit Sub bbb() Dim n As Integer Debug.Print "コレクションの数:" & ActiveChart.SeriesCo…
ken3memo.hatenablog.comhttps://youtu.be/jP0O2KlXeLE 目次 00:00 1.処理のタイミングをとりたい 00:32 1.2 標準モジュールにOnSlideShowPageChange 03:20 1.4 ん？一回目にコードが走らない？なんだこれ？ 05:55 2.事前準備で名前を付ける 08:12 3.1 1ペー…
PowerPoint2003マクロ記録で 挿入 ビデオとサウンド ファイルからサウンド 操作を記録した。 記録したコードは概要欄・コメント欄を見てください。youtu.be#PowerPointVBA #マクロ記録 #Shapes #AddMediaObject #デバッグ .AddMediaObject は 2013で廃止され…
PowerPoint2003マクロ記録で ファイル ページ設定 スライド 縦(P) 操作を記録した。 記録したコードは概要欄・コメント欄を見てください。youtu.be#PowerPointVBA #マクロ記録 #PageSetup #デバッグ Sub Macro3() ' ' マクロ記録日: 2022/5/18 ユーザー名: K…
