次の方法で共有

NamedSlideShow.SlideIDs プロパティ (PowerPoint)

指定した名前のスライド ショーのスライド ID の配列を取得します。 値の取得のみ可能です。

構文

式。 SlideIDs

式NamedSlideShow オブジェクトを表す変数。

戻り値

バリアント型

例

次の使用例は、作業中のウィンドウの現在のスライドを "Marketing Short Version" という名前のカスタム スライド ショーに追加します。変更したバージョンのカスタム スライド ショーを保存するには、元のカスタム ショーを削除してから、同じ名前を使用して再度追加する必要があることに注意してください。 バリアント型 の変数に格納されている配列のサイズを変更する場合は、必要があります明示的に宣言する変数の配列のサイズを変更する前にも注意してください。

'NOTE - The following code line is NOT optional.
'Can't redim array without this
Dim customShowSlideIDs As Variant
Dim customShowToExpand As NamedSlideShow

customShowName = "Marketing Short Version"

Set customShowToExpand = ActivePresentation.SlideShowSettings _
    .NamedSlideShows(customShowName)

slideToAddID = ActiveWindow.View.Slide.SlideID
customShowSlideIDs = customShowToExpand.SlideIDs
numSlides = UBound(customShowSlideIDs)

ReDim Preserve customShowSlideIDs(numSlides + 1)

customShowSlideIDs(numSlides + 1) = slideToAddID
customShowToExpand.Delete
ActivePresentation.SlideShowSettings.NamedSlideShows _
    .Add customShowName, customShowSlideIDs

関連項目

NamedSlideShow オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。