CalloutFormat.Accent-Eigenschaft (Publisher)

Gibt eine MsoTriState-Konstante zurück, die angibt, ob eine vertikale Akzentleiste den Legendentext von der Legendenlinie trennt, oder legt sie fest. Lese-/Schreibzugriff.

Syntax

Ausdruck. Akzent

Ausdruck Eine Variable, die ein CalloutFormat-Objekt darstellt.

Rückgabewert

MsoTriState

HinwBemerkungeneise

Der Wert der Accent -Eigenschaft kann eine der folgenden MsoTriState -Konstanten sein.

Konstante	Beschreibung
msoCTrue	Wird mit dieser Eigenschaft nicht verwendet.
msoFalse	Eine vertikale Akzentleiste trennt den Legendentext nicht von der Legendenlinie.
msoTriStateMixed	Nur Rückgabewert; Gibt eine Kombination von MsoTrue und MsoFalse im angegebenen Formbereich an.
msoTriStateToggle	Nur festgelegter Wert; Wechselt zwischen MsoTrue und MsoFalse.
msoTrue	Eine vertikale Markierungsleiste trennt den Legendentext von der Legendenlinie.

Beispiel

In dem folgenden Beispiel werden der aktiven Publikation ein Oval und eine Legende hinzugefügt, die auf das Oval zeigt. Der Legendentext wird ohne Rahmen, aber mit einer vertikalen Akzentleiste dargestellt, die den Text von der Legendenlinie trennt.

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 

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.