Метод Font.SetScriptName (Publisher)

Задает имя скрипта шрифта для использования в текстовом диапазоне.

Синтаксис

expression. SetScriptName (Script, FontName)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Script	Обязательный	PbFontScriptType	Имя скрипта. Может быть одной из констант PbFontScriptType , объявленных в библиотеке типов издателя Майкрософт.
FontName	Обязательный	String	Имя шрифта.

Пример

В этом примере проверяется, что скрипт шрифта по умолчанию, используемый для указанного текстового диапазона, — Tahoma, и в противном случае задает его в качестве скрипта шрифта по умолчанию.

Sub GetScript() 
 With ActiveDocument.Pages(1).Shapes(1) _ 
 .TextFrame.TextRange.Font 
 If .GetScriptName(Script:=pbFontScriptDefault) <> "Tahoma" Then 
 .SetScriptName Script:=pbFontScriptDefault, _ 
 FontName:="Tahoma" 
 End If 
 End With 
End Sub

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

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