Freigeben über


TextRange.BoundHeight-Eigenschaft (Publisher)

Gibt einen Wert vom Typ Single zurück, der die Höhe des Begrenzungsrahmens für den angegebenen Textbereich in Punkt angibt. Schreibgeschützt.

Syntax

Ausdruck. BoundHeight

Ausdruck Eine Variable, die ein TextRange-Objekt darstellt.

Rückgabewert

Single

Beispiel

Das folgende Beispiel zeigt die Position, Breite und Höhe des Rahmenfelds an, das den Text in der ersten Form auf Seite 1 der aktiven Publikation umgibt.

Dim rngText As TextRange 
Dim strMessage As String 
 
Set rngText = ActiveDocument.Pages(1) _ 
 .Shapes(1).TextFrame.TextRange 
 
With rngText 
 strMessage = "Text frame information" & vbCrLf _ 
 & " Distance from left edge of page: " _ 
 & .BoundLeft & " points" & vbCrLf _ 
 & " Distance from top edge of page: " _ 
 & .BoundTop & " points" & vbCrLf _ 
 & " Width: " & .BoundWidth & " points" & vbCrLf _ 
 & " Height: " & .BoundHeight & " points" 
End With 
 
MsgBox strMessage

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.