CalloutFormat.Drop-Eigenschaft (Publisher)

Legen Sie für Legenden mit einem explizit festgelegten Wert, diese Eigenschaft gibt den vertikalen Abstand vom Rand des Textbereichs und der Stelle, an die Legendenlinie mit dem Textfeld verbunden.

Dieser Abstand wird vom oberen Rand des Textfelds gemessen, es sei denn, die AutoAttach-Eigenschaft ist auf True festgelegt und das Textfeld befindet sich links vom Ursprung der Legendenlinie (wo die Legende zeigt). In diesem Fall wird der Abstand vom unteren des Textfelds gemessen. Schreibgeschützter Variant-Wert.

Syntax

Ausdruck. Drop

Ausdruck Eine Variable, die ein CalloutFormat-Objekt darstellt.

Rückgabewert

Variant

Bemerkungen

Numerische Werte werden in Punkten ausgewertet; Zeichenfolgen können in beliebigen Einheiten enthalten sein, die von Microsoft Publisher unterstützt werden (z. B. "2,5 zoll").

Verwenden Sie die CustomDrop -Methode, um den Wert dieser Eigenschaft festzulegen.

Der Wert dieser Eigenschaft gibt die Position der Legendenzeilenanlage zum Textfeld nur dann genau wieder, wenn die Legende einen explizit festgelegten Drop-Wert aufweist, d. h. wenn der Wert der DropType-EigenschaftmsoCalloutDropCustom ist.

Beispiel

Bei diesem Beispiel wird der benutzerdefinierte Ansatzwert für die erste Form in der aktiven Publikation durch einen von zwei voreingestellten Ansatzwerten ersetzt, je nachdem, ob der benutzerdefinierte Ansatzwert größer oder kleiner als die halbe Höhe des Legendentextfelds ist. Damit das Beispiel ausgeführt werden kann, muss es sich bei der Form um eine Legende handeln.

With ActiveDocument.Pages(1).Shapes(1).Callout 
 If .DropType = msoCalloutDropCustom Then 
 If .Drop < .Parent.Height / 2 Then 
 .PresetDrop DropType:=msoCalloutDropTop 
 Else 
 .PresetDrop DropType:=msoCalloutDropBottom 
 End If 
 End If 
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.