Ajouter une diapositive avec une disposition personnalisée
Bonjour,
Je souhaite créer une diapositive dans ma présentation avec une "disposition" particuliere depuis un masque de diapositive particulier.
Est il possible de le faire avec le "nom" de ces dernier, ou bien il n'y a pas d'autre choix que de passer par les numero d'index ?
Code:
1
2
3
4
5
|
With ActivePresentation
Set pptlayout = .Designs(1).SlideMaster.CustomLayouts(4)
Set NewSlide = .ActivePresentation.Slides.AddSlide(slideOrder(1), pptlayout)
End with |
Est il possible de préciser la chaine de caractère qui est utilisé pour nommer le "Master slide" et le "custom layout"
Du genre
Code:
Set pptlayout = .Designs("Trame X").SlideMaster.CustomLayouts("Text + Chart")
Edit:
Je me dis que je ne vais pas pouvoir passer outre une boucle de recherche de numero "d'index"
Je balaie tous les masques de diapositive jusqu'a rechercher "Trame X", je retourne le numero d'index
Dans cette trame, je balaie les disposition jusqu'a rechercher la disposition "Text + Chart", je retourne le numero d'index
Puis avec les deux éléments trouvé ci dessus, je peux créer ma diapositive aux petits oignons. Mais ca me donne l'impression que c'est un peu bourrin
Merci
