Publisher.Application.PointsToLines.md

title	keywords	f1_keywords	api_name	ms.assetid	ms.date	ms.localizationpriority
Application.PointsToLines method (Publisher)	vbapb10.chm131158	vbapb10.chm131158	Publisher.Application.PointsToLines	beab39fe-9458-6878-ae45-487a8b2271df	06/05/2019	medium

Application.PointsToLines method (Publisher)

Converts a measurement from points to lines (1 line = 12 points). Returns the converted measurement as a Single.

Syntax

expression.PointsToLines (Value)

expression A variable that represents an Application object.

Parameters

Name	Required/Optional	Data type	Description
Value	Required	Single	The point value to be converted to lines.

Return value

Single

Remarks

This method assumes a measurement in 12-point lines; the actual size of any text in the publication has no effect on the conversion factor.

Use the LinesToPoints method to convert measurements in lines to points.

Example

This example converts measurements in points to measurements in lines, demonstrating that the font size in the current selection has no bearing on the conversion factor. Some text must be selected in the active publication for this example to work.

Dim strOutput As String 
 
' Set text size to 10 points. 
Selection.TextRange.Font.Size = 10 
 
' Display result for 12 points. 
strOutput = "12 points = " _ 
 & Format(Application _ 
 .PointsToLines(Value:=12), _ 
 "0.00") & " lines"

[!includeSupport and feedback]