Klasse Designs (PowerPoint VBA)
Die Klasse Designs stellt eine Auflistung von Folienentwurfsvorlagen dar.
Um eine Designs -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim dsgs as Designs
Set dsgs = ActivePresentation.Designs
Klassen Variablen vom Typ Designs können mit der Prozedur Presentation.Designs festgelegt werden
Add
Gibt ein Design -Objekt zurück, das eine neue Folienentwurfsvorlage darstellt.
Add (designName, Index)
Dim strdesignName As String: strdesignName =
Dim dsg As Design
Set dsg = ActivePresentation.Designs.Add(designName:=strdesignName)
Arguments
Clone
Erstellt eine Kopie eines Design -Objekts.
Dim dsgClone As Design
Set dsgClone = ActivePresentation.Designs.Clone(pOriginal:=)
Arguments
Count
Gibt die Anzahl von Objekten in der angegebenen Auflistung zurück. Schreibgeschützt.
Dim lngCount As Long
lngCount = ActivePresentation.Designs.Count
Item
Gibt ein einzelnes Design -Objekt aus der angegebenen Designs -Auflistung zurück.
Item (Index)
Index: Der Name oder die Indexnummer des einzelnen Design -Objekts in der Auflistung, das zurückgegeben werden soll.
Dim dsg As Design
Set dsg = ActivePresentation.Designs(Index:=1)
Load
Gibt ein Design -Objekt, das eine Entwurfsvorlage in die Masterliste der angegebenen Präsentation geladen darstellt.
Load (TemplateName, Index)
Dim strTemplateName As String: strTemplateName =
Dim dsgLoad As Design
Set dsgLoad = ActivePresentation.Designs.Load(TemplateName:=strTemplateName)
Arguments
Optional arguments
Das folgendes Argument ist optional
Index
(Long) - The index number of the design template in the collection of design templates.The index number of the design template in the collection of design templates. The default is -1, which means the design template is added to the end of the list of designs in the presentation.The default is -1, which means the design template is added to the end of the list of designs in the presentation.