Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Für Legenden mit explizit festgelegtem Drop-Wert gibt diese Eigenschaft den vertikalen Abstand (in Punkten) vom Rand des Textbegrenzungsrahmens bis zu der Stelle zurück, an der die Legendenlinie an das Textfeld angefügt wird. Schreibgeschützter Single-Wert.
Syntax
Ausdruck verwendet werden. Weglassen
Ausdruck Eine Variable, die ein CalloutFormat-Objekt darstellt.
Hinweise
Dieser Abstand wird vom oberen Rand des Textfelds aus gemessen, es sei denn, die AutoAttach-Eigenschaft ist auf "True" festgelegt und das Textfeld befindet sich links vom Ursprung der Legendenlinie (der Stelle, auf die die Legende zeigt). In diesem Fall wird der Abfallabstand vom unteren Rand des Textfelds gemessen.
Verwenden Sie die CustomDrop -Methode, um den Wert dieser Eigenschaft festzulegen.
Der Wert dieser Eigenschaft gibt die Position der Anlage der Popuplinie am Textfeld nur dann genau wieder, wenn die Legende einen explizit festgelegten Drop-Wert hat, d. h. wenn der Wert der DropType-Eigenschaft"msoCalloutDropCustom" lautet.
Beispiel
In diesem Beispiel wird der benutzerdefinierte Tropfen für Form eins in myDocument durch einen von zwei voreingestellten Tropfen ersetzt, je nachdem, ob der benutzerdefinierte Tropfen größer als oder weniger als die Hälfte der Höhe des Textfelds mit den Zusatzinformationen ist. Damit das Beispiel funktioniert, muss es sich bei Form 1 um eine Legende handeln.
Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Callout
If .DropType = msoCalloutDropCustom Then
If .Drop < .Parent.Height / 2 Then
.PresetDrop msoCalloutDropTop
Else
.PresetDrop 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.