Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Wandelt eine Messung von Linien in Punkte um (1 Linie = 12 Punkte). Gibt die konvertierte Maßangabe als Single-Wert zurück.
Syntax
Ausdruck verwendet werden. LinesToPoints (Wert)
expression Eine Variable, die ein Application-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Wert | Erforderlich | Single | Der Zeilenwert, der in Punkt konvertiert werden soll. |
Rückgabewert
Einzel
Hinweise
Diese Methode geht von einer Messung in 12-Punkt-Linien aus; Die tatsächliche Größe eines Textes in der Publikation hat keinen Einfluss auf den Umrechnungsfaktor.
Verwenden Sie die PointsToLines -Methode, um Maßangaben von Punkt in Zeilen zu konvertieren.
Beispiel
Dieses Beispiel konvertiert Maßangaben in Zeilen in Maßangaben in Punkt und zeigt, dass die Schriftgröße in der aktuellen Auswahl keinen Einfluss auf den Umrechnungsfaktor hat. Damit dieses Beispiel funktioniert, muss in der aktiven Publikation Text ausgewählt sein.
Dim strOutput As String
' Set text size to 10 points.
Selection.TextRange.Font.Size = 10
' Display result for one line of text.
strOutput = "1 line = " _
& Format(Application _
.LinesToPoints(Value:=1), _
"0.00") & " points"
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.