Freigeben über

TextRange.BoundWidth-Eigenschaft (Publisher)

  • Artikel

Gibt einen Single-Wert zurück, der die Breite des Begrenzungsrahmens für den angegebenen Textbereich in Punkt angibt. Schreibgeschützt.

Syntax

Ausdruck. BoundWidth

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.