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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour