Classe Guide (PowerPoint VBA)

La classe Guide représente un repère de dessin dans la présentation ou une disposition personnalisée.

Set

Pour utiliser une variable de classe Guide, elle doit d'abord être instanciée, par exemple

Dim gui as Guide
Set gui = ActivePresentation.SlideMaster.CustomLayouts(1).Guides(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Guide : Guides.Item, Guides.Add, CustomLayout.Guides, Master.Guides et Presentation.Guides

Color

Renvoie un objet ColorFormat qui représente la couleur du repère de dessin. En lecture seule.

Dim cftColor As ColorFormat
Set cftColor = ActivePresentation.SlideMaster.CustomLayouts(1).Guides(1).Color

Delete

Supprime le Guide de dessin de la présentation ou de la mise en page personnalisée.

ActivePresentation.SlideMaster.CustomLayouts(1).Guides(1).Delete

Orientation

Renvoie l’orientation du repère de dessin (horizontale ou verticale) en tant que constante à partir de l’énumération PpGuideOrientation . En lecture seule.

Valeurs possibles sont ppHorizontalGuide - Représente un repère horizontal, en partant de la gauche vers la droite de la fenêtre d'édition des diapositives, ppVerticalGuide - Représente un repère vertical entre le bord supérieur et le bas de la fenêtre d'édition des diapositives.
Dim pgoOrientation As PpGuideOrientation
pgoOrientation = ActivePresentation.SlideMaster.CustomLayouts(1).Guides(1).Orientation

Parent

Renvoie le parent de l'objet spécifié. Objeten lecture seule.

Position

Cette propriété renvoie ou définit une valeur unique qui représente la position du repère de dessin le long de l’axe x ou y. Lecture-écriture.

ActivePresentation.SlideMaster.CustomLayouts(1).Guides(1).Position =

Guides.Add

Ajoute un nouveau repère de dessin à la présentation, au masque des diapositives ou à la mise en page personnalisée.

Syntaxe : expression.Add (Orientation, Position)

Dim gui As Guide
Set gui = ActivePresentation.SlideMaster.CustomLayouts(1).Guides.Add(Orientation:=ppHorizontalGuide, Position:=)

Arguments

Les arguments nommés :

Orientation (PpGuideOrientation) - Cette énumération spécifie l’orientation d’un repère de dessin, qu’il soit horizontal ou vertical.

Valeurs possibles sont ppHorizontalGuide - Représente un repère horizontal, en partant de la gauche vers la droite de la fenêtre d'édition des diapositives, ppVerticalGuide - Représente un repère vertical entre le bord supérieur et le bas de la fenêtre d'édition des diapositives.

Position (Single) - Position du repère le long de l’axe spécifié.

Guides.Count

Renvoie le nombre d'objets de la collection spécifiée. En lecture seule.

Dim lngCount As Long
lngCount = ActivePresentation.SlideMaster.CustomLayouts(1).Guides.Count

Guides.Item

Renvoie un objet Guide à partir de la collection.

Syntaxe : expression.Item (Index)

Index: Numéro d’index de l’objet Guide unique de la collection à renvoyer.

Dim gui As Guide
Set gui = ActivePresentation.SlideMaster.CustomLayouts(1).Guides(Index:=1)

Guides.Parent

Renvoie le parent de l'objet spécifié. Objeten lecture seule.