Свойство Document.ActiveWritingStyle (Word)

Статья
04/07/2023

Возвращает или задает стиль записи для указанного языка в указанном документе. Для чтения и записи, String.

Синтаксис

выражение. ActiveWritingStyle( _LanguageID_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
LanguageID	Обязательный	Variant	Язык для задания стиля записи в указанном документе. Может быть строкой или одной из следующих констант WdLanguageID . Некоторые константы WdLanguageID могут быть недоступны в зависимости от выбранной или установленной языковой поддержки (например, английский язык США).

Замечания

Свойство WritingStyleList возвращает массив имен доступных стилей записи.

Пример

В этом примере задается стиль письма, используемый для активного документа на французском, немецком и английском языках США. Для выполнения этого примера необходимо установить грамматические файлы для французского, немецкого и английского языков США.

With ActiveDocument 
 .ActiveWritingStyle(wdFrench) = "Commercial" 
 .ActiveWritingStyle(wdGerman) = "Technisch/Wiss" 
 .ActiveWritingStyle(wdEnglishUS) = "Technical" 
End With

В этом примере возвращается стиль написания для языка выделенного фрагмента.

Sub WhichLanguage() 
 Dim varLang As Variant 
 
 varLang = Selection.LanguageID 
 MsgBox ActiveDocument.ActiveWritingStyle(varLang) 
End Sub

См. также

Объект Document

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

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

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