CalloutFormat.Drop-Eigenschaft (Word)
Gibt den vertikalen Abstand (in Punkt) zwischen dem Rand des Textbereichs und der Stelle an, an der die Legendenlinie mit dem Textfeld verbunden ist. Schreibgeschützter Single-Wert.
Syntax
Ausdruck. Tropfen
Ausdruck Eine Variable, die ein "CalloutFormat"-Objekt darstellt.
Hinweise
Die Drop-Eigenschaft gilt für Legenden mit einem explizit festgelegten Drop-Wert. Dieser Abstand wird vom oberen Rand des Textfelds gemessen, es sei denn, das Textfeld befindet sich links vom Ursprung der Legendenlinie (der Stelle, auf die die Legende zeigt). In diesem Fall wird der Ablageabstand vom unteren Rand des Textfelds gemessen.
Verwenden Sie die CustomDrop -Methode, um den Wert dieser Eigenschaft festzulegen.
Der Wert dieser Eigenschaft zeigt die Position der die Legendenlinie mit dem Textfeld nur dann, wenn die Legende einen explizit festgelegten Wert drop - d. h., wenn der Wert der DropType -Eigenschaft MsoCalloutDropCustom ist. Verwenden Sie die -Anweisung PresetDrop msoCalloutCustomDrop , um die DropType-Eigenschaft auf msoCalloutDropCustom festzulegen.
Beispiel
In diesem Beispiel wird der benutzerdefinierte Drop für die erste Form im aktiven Dokument durch einen von zwei voreingestellten Löschvorgängen ersetzt, je nachdem, ob der benutzerdefinierte Ablagewert größer oder kleiner als die Hälfte der Höhe des Legendentextfelds ist. Dieses Beispiel funktioniert nur, wenn es sich bei der ersten Form um eine Legende handelt.
Dim docActive As Document
Set docActive = ActiveDocument
With docActive.Shapes(1).Callout
If .DropType = msoCalloutDropCustom Then
If .Drop < .Parent.Height / 2 Then
.PresetDrop msoCalloutDropTop
Else
.PresetDrop msoCalloutDropBottom
End If
End If
End With
Siehe auch
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.