Note
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier les répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de changer de répertoire.
Renvoie une matrice d’identification de diapositive pour le diaporama nommé spécifié. En lecture seule.
Syntaxe
expression. SlideIDs
expression Variable qui représente un objet NamedSlideShow .
Valeur renvoyée
Variant
Exemple
Cet exemple montre comment ajouter la diapositive active de la fenêtre active au diaporama personnalisé nommé « Version courte marketing ». Notez que pour enregistrer une version modifiée du diaporama personnalisé, vous devez supprimer le diaporama personnalisé d’origine, puis l’ajouter à nouveau, en utilisant le même nom. Par ailleurs, si vous souhaitez redimensionner une matrice contenue dans une variable Variant, vous devez explicitement déclarer la variable avant d’essayer de redimensionner sa matrice.
'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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.