Propriété CalloutFormat.Accent (Publisher)

Renvoie ou définit une constante MsoTriState indiquant si une barre d’accentuation verticale sépare le texte de la légende de la ligne de légende. Lecture-écriture.

Syntaxe

expression. Accentuation

Expression Variable qui représente un objet CalloutFormat .

Valeur renvoyée

MsoTriState

Remarques

La valeur de la propriété Accent peut être une de ces constantes MsoTriState.

Constante Description
msoCVrai Ne s'applique pas à cette propriété.
msoFaux Aucune barre d'accentuation verticale ne sépare le texte de légende de la ligne de légende.
msoTriEtatMélangé Valeur renvoyée uniquement ; Indique une combinaison de msoTrue et msoFalse pour la plage de formes spécifiée.
msoTriStateToggle Valeur définie uniquement ; Bascule entre msoTrue et msoFalse.
msoVrai Une barre d'accentuation verticale sépare le texte de légende de la ligne de légende.

Exemple

Cet exemple ajoute une ellipse à la composition active et une légende qui est pointée vers cette ellipse. Le texte de la légende n'a pas de bordure, mais une barre verticale qui sépare le texte du trait de la légende.

With ActiveDocument.Pages(1).Shapes 
 ' Add an oval. 
 .AddShape Type:=msoShapeOval, _ 
 Left:=180, Top:=200, Width:=280, Height:=130 
 
 ' Add a callout. 
 With .AddCallout(Type:=msoCalloutTwo, _ 
 Left:=420, Top:=170, Width:=170, Height:=40) 
 
 ' Add text to the callout. 
 .TextFrame.TextRange.Text = "This is an oval" 
 
 ' Add an accent bar to the callout. 
 With .Callout 
 .Accent = msoTrue 
 .Border = msoFalse 
 End With 
 End With 
End With 

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.