Partager via

Objet CalloutFormat (Publisher)

  • Article

Cet objet contient des propriétés et méthodes qui s'appliquent aux légendes encadrées.

Remarques

Utilisez la propriété Callout de l’objet Shape pour renvoyer un objet CalloutFormat .

Exemple

L’exemple suivant ajoute une légende à la composition active, ajoute du texte à la légende, puis spécifie les attributs suivants pour la légende :

  • Une barre d’accentuation verticale sépare le texte de la ligne de légende (propriété Accentuation ).
  • L’angle entre la ligne de légende et le côté de la zone de texte de légende est de 30 degrés (propriété Angle ).
  • Il n’y a aucune bordure autour du texte de légende (propriété Border ).
  • La ligne de légende est attachée au haut de la zone de texte de légende (méthode PresetDrop ).
  • La ligne de légende contient trois segments (propriété Type ).
Sub AddFormatCallout() 
 With ActiveDocument.Pages(1).Shapes.AddCallout(Type:=msoCalloutOne, _ 
 Left:=150, Top:=150, Width:=200, Height:=100) 
 With .TextFrame.TextRange 
 .Text = "This is a callout." 
 With .Font 
 .Name = "Stencil" 
 .Bold = msoTrue 
 .Size = 30 
 End With 
 End With 
 With .Callout 
 .Accent = MsoTrue 
 .Angle = msoCalloutAngle30 
 .Border = MsoFalse 
 .PresetDrop msoCalloutDropTop 
 .Type = msoCalloutThree 
 End With 
 End With 
End Sub

Méthodes

Propriétés

Voir aussi

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.