Объект Style (Word)

Представляет один встроенный или определенный пользователем стиль. Объект Style включает атрибуты стиля (например, шрифт, стиль шрифта и интервал абзаца) в качестве свойств объекта Style . Объект Style входит в коллекцию Styles . Коллекция Стилей включает все стили в указанном документе.

Примечания

Чтобы вернуть один объект Style, используйте Стили (Index), где Index — это имя стиля, константа WdBuiltinStyle или номер индекса . Вы должны точно соответствовать орфографии и интервалу имени стиля, но не обязательно его капитализации. В следующем примере изменяется имя шрифта определенного пользователем стиля с именем "Цвет" в активном документе.

ActiveDocument.Styles("Color").Font.Name = "Arial"

В следующем примере встроенный стиль Heading 1 не должен быть смелым.

ActiveDocument.Styles(wdStyleHeading1).Font.Bold = False

Номер индекса стиля представляет положение стиля в алфавитном списке имен стилей. Обратите внимание Styles(1) , что это первый стиль в алфавитном списке. В следующем примере показан базовый стиль и имя стиля первого стиля в коллекции Styles .

MsgBox "Base style= " _ 
 & ActiveDocument.Styles(1).BaseStyle & vbCr _ 
 & "Style name= " & ActiveDocument.Styles(1).NameLocal

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

Set myRange = ActiveDocument.Range( _ 
 Start:=ActiveDocument.Paragraphs(1).Range.Start, _ 
 End:=ActiveDocument.Paragraphs(4).Range.End) 
myRange.Style = wdStyleNormal

В следующем примере применяется стиль Heading 1 к первому абзацу в выборе.

Selection.Paragraphs(1).Style = wdStyleHeading1

В следующем примере создается стиль символов с именем "Bolded" и применяется его к выбору.

Set myStyle = ActiveDocument.Styles.Add(Name:="Bolded", _ 
 Type:=wdStyleTypeCharacter) 
myStyle.Font.Bold = True 
Selection.Range.Style = "Bolded"

Используйте метод OrganisCopy для копирования стилей между документами и шаблонами. Используйте метод UpdateStyles для обновления стилей в активном документе, чтобы соответствовать определениям стиля в прикрепленном шаблоне. Чтобы изменить стили шаблона, используйте метод OpenAsDocument для открытия шаблона в качестве документа.

См. также

Справочник по объектной модели Word

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

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