CalloutFormat.DropType-Eigenschaft (PowerPoint)
Gibt einen Wert zurück, der die Position angibt, an der die Legendenlinie mit dem Legendentextfeld verbunden ist. Schreibgeschützt.
Syntax
Ausdruck. DropType
Ausdruck Eine Variable, die ein CalloutFormat-Objekt darstellt.
Rückgabewert
MsoCalloutDropType
HinwBemerkungeneise
Wenn der Legendenverknüpfungstyp msoCalloutDropCustom ist, werden die Werte der Eigenschaften Dropund 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.
Der von der DropType -Eigenschaft zurückgegebene Wert kann einer der folgenden MsoCalloutDropType -Konstanten entsprechen.
msoCalloutDropBottom |
msoCalloutDropCenter |
msoCalloutDropCustom |
msoCalloutDropMixed |
msoCalloutDropTop |
Beispiel
In diesem Beispiel wird überprüft, ob Form 3 in myDocument 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.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.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
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für