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
Hinweise
Wenn der Legenden-Drop-Typ MsoCalloutDropCustom ist, werden die Werte der Dropand AutoAttach-Eigenschaften und die relativen Positionen des Legendentextfelds und des Legendenlinienursprungs (die Stelle, auf die die Legende zeigt) verwendet, um zu bestimmen, wo die Legendenlinie mit dem Textfeld verbunden ist.
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 Bezug ist. Ist dies der Fall, ersetzt der Code den benutzerdefinierten Drop durch einen von zwei vordefinierten Drops, je nachdem, ob der benutzerdefinierte Bezugswert 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.