Freigeben über


Application.PointsToInches-Methode (Word)

Konvertiert ein Maß von Punkt in Zoll (1 Zoll = 72 Punkt). Gibt die konvertierte Maßangabe als Single-Wert zurück.

Syntax

Ausdruck. PointsToInches( _Points_ )

expression Eine Variable, die ein Application-Objekt darstellt. Optional.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Points Erforderlich Single Das in Punkt angegebene Maß.

Rückgabewert

Single

Beispiel

In diesem Beispiel wird das Maß des oberen Rands im aktiven Dokument in Zoll konvertiert. Das Ergebnis wird in einem Meldungsfeld angezeigt.

MsgBox PointsToInches(ActiveDocument.Sections(1) _ 
 .PageSetup.TopMargin)

In diesem Beispiel wird der Wert der Variablen sngData (ein Maß in Punkt) in Zentimeter, Zoll, Linien, Millimeter oder Picas konvertiert, abhängig vom Wert der Variablen intUnit (ein Wert von 1 bis 5, der die resultierende Maßeinheit angibt).

Function ConvertPoints(ByVal intUnit As Integer, _ 
 sngData As Single) As Single 
 
 Select Case intUnit 
 Case 1 
 ConvertPoints = PointsToCentimeters(sngData) 
 Case 2 
 ConvertPoints = PointsToInches(sngData) 
 Case 3 
 ConvertPoints = PointsToLines(sngData) 
 Case 4 
 ConvertPoints = PointsToMillimeters(sngData) 
 Case 5 
 ConvertPoints = PointsToPicas(sngData) 
 Case Else 
 Error 5 
 End Select 
 
End Function

Siehe auch

Application-Objekt

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.