

VBAの全くの初心者です。今回、初めて参加させて頂きます。  
よろしくお願い致します。

PowerPointのスライドショー画面切り替え時間をVBAで一度に入力可能なサンプルコードを探しております。

今まではPowerPointのリハーサルで画面の切り替え時間を調整しておりました。  
今回はあらかじめ、決められたスライド毎の時間をリハーサル、またはPowerPointで画面入力することなく、VBAにて全て自動で入力を行いたいです。  
PowerPointの画面切り替えにて時間設定でスライドごとに入力することは可能ですが、Excelで作った切り替え時間があるので一度にVBAにてExcelから取り込み、最後のmp4の書き出しまで自動化が出来ればと考えております。

宜しくご指導のほど、お願い致します。

下記のような、全スライドを一度に同じ時間で設定する方法は見つけました。  
今回はスライド毎に異なる時間をVBAにて一度に設定する方法を教えて頂きたいです。

スライド枚数は通常３０枚前後になりますが、可能であれば実際のサンプルコードとして、今回は３枚のスライドショーの画面切り替えにて各時間を5秒、１０秒、1分３２秒になった場合の実際のコードを教えて頂ければ幸いです。

あらかじめ入力するデータはExcel上で作成済みとします。

  * ①スライド番号、②時間

また、サンプルコードが出来た場合には毎回、スライドの枚数や各スライド時間が異なるものを同じようにVBAのコードに埋め込むことになりますが、毎回、機械的に自動化できる何か良い方法などありましたらアイデアも頂きたいと思います。

よろしくお願い致します。

ちなみに下記は全てのスライドを一度に5.5秒で設定しているサンプルでした。

[code]

    Sub 画面切替時間を設定する_全スライド()
    　Const SHOW_SEC = 5.5
    
    　Dim sld As Slide
    
    　For Each sld In ActivePresentation.Slides
    　With sld.SlideShowTransition
    　　.AdvanceOnTime = msoTrue
    　　.AdvanceTime = SHOW_SEC
    　End With
    　Next sld
    
    End Sub
    
[/code]


CC BY-SA 4.0
2021-08-23T23:04:05.593
80996
2021-08-24T00:17:04.733
2021-08-24T00:17:04.733
3060
47839
question
vba powerpoint
PowerPointのスライドショーの画面切替タイミングをスライド毎に決められた時間でVBAで自動入力する方法はありますか？