PointsToLines Method Example

This example converts the line spacing value of the first paragraph in the selection from points to lines.

MsgBox PointsToLines(Selection.Paragraphs(1).LineSpacing) _
    & " lines"

This example converts the value of the variable data (a measurement in points) to centimeters, inches, lines, millimeters, or picas, depending on the value of the variable unit (a value from 1 through 5 that indicates the resulting unit of measurement).

Select Case unit
    Case 1
        result = PointsToCentimeters(data)
    Case 2
        result = PointsToInches(data)
    Case 3
        result = PointsToLines(data)
    Case 4
        result = PointsToMillimeters(data)
    Case 5
        result = PointsToPicas(data)
    Case Else
        Error 5
End Select