CalloutFormat.DropType-Eigenschaft (Word)

Gibt einen Wert zurück, der die Position angibt, an der die Legendenlinie mit dem Legendentextfeld verbunden ist. MsoCalloutDropType-Wert mit Lese-/Schreibzugriff.

Syntax

Ausdruck. DropType

Ausdruck: Erforderlich. Eine Variable, die ein "CalloutFormat"-Objekt darstellt.

HinwBemerkungeneise

Wenn der Legendenverknüpfungstyp msoCalloutDropCustom ist, werden die Werte der Eigenschaften Drop und AutoAttach sowie die relativen Positionen des Legendentextfelds und des Legendenlinienursprungs (die Stelle, auf die die Legende zeigt) verwendet, um zu bestimmen, wo die Legendenlinie an das Textfeld angefügt wird.

Diese Eigenschaft ist schreibgeschützt. Verwenden Sie die PresetDrop-Methode , um den Wert dieser Eigenschaft festzulegen.

Beispiel

In diesem Beispiel wird überprüft, ob die dritte Form im aktiven Dokument eine Legende mit einem benutzerdefinierten Drop ist. Wenn dies der Fall ist, ersetzt der Code den benutzerdefinierten Drop durch einen von zwei voreingestellten Drops, je nachdem, ob der benutzerdefinierte Ablagewert größer oder kleiner als die Hälfte der Höhe des Legendentextfelds ist.

Dim docActive As Document 
 
Set docActive = ActiveDocument 
 
With docActive.Shapes(3) 
 If .Type = msoCallout Then 
 With .Callout 
 If .DropType = msoCalloutDropCustom Then 
 If .Drop < .Parent.Height / 2 Then 
 .PresetDrop msoCalloutDropTop 
 Else 
 .PresetDrop msoCalloutDropBottom 
 End If 
 End If 
 End With 
 End If 
End With

Siehe auch

CalloutFormat-Objekt

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.