Метод Application.LinesToPoints (издатель)

Статья
04/07/2023

Преобразует измерение из строк в точки (1 строка = 12 точек). Возвращает преобразованное измерение в виде единицы.

Синтаксис

expression. LinesToPoints (значение)

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Value (Значение)	Обязательный	Single	Значение строки, преобразуемое в точки.

Возвращаемое значение

Одинарное

Замечания

Этот метод предполагает измерение в линиях из 12 точек; Фактический размер любого текста в публикации не влияет на коэффициент преобразования.

Используйте метод PointsToLines для преобразования измерений в точках в линии.

Пример

В этом примере измерения в строках преобразуются в измерения в точках, демонстрируя, что размер шрифта в текущем выделенном фрагменте не влияет на коэффициент преобразования. Чтобы этот пример работал, в активной публикации должен быть выделен некоторый текст.

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"

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через