ShapeRange.GetTop-Methode (Publisher)

Gibt den Abstand der oberen Kante der Form oder des Formbereichs vom oberen Rand der äußersten linken Seite in der aktuellen Ansicht als Single in den angegebenen Einheiten zurück.

Syntax

Ausdruck. GetTop (Einheit)

Ausdruck Eine Variable, die ein ShapeRange-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Unit	Erforderlich	PbUnitType	Die Einheiten, in denen der Abstand zurückgegeben werden soll. Dies kann eine der PbUnitType-Konstanten sein, die in der Microsoft Publisher-Typbibliothek deklariert sind.

Rückgabewert

Einzel

Hinweise

Verwenden Sie die GetLeft -Methode, um den Abstand zwischen der linken Begrenzung einer Form oder eines Formenbereichs und der linken Begrenzung der am weitesten links liegenden Seite in der aktuellen Ansicht zurückzugeben.

Beispiel

Im folgenden Beispiel werden die Abstände zwischen dem linken und oberen Rand der äußersten linken Seite und den oberen Rändern des Formbereichs angezeigt, der aus allen Shapes auf der ersten Seite besteht. Die Abstände werden in Zoll (auf das nächste Hundertstel gerundet) ausgedrückt.

With ActiveDocument.Pages(1).Shapes.Range 
 MsgBox "Distance from left: " _ 
 & Format(.GetLeft(Unit:=pbUnitInch), "0.00") _ 
 & " in" & vbCr _ 
 & "Distance from top: " _ 
 & Format(.GetTop(Unit:=pbUnitInch), "0.00") _ 
 & " in" 
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.