Форум по VBA, Excel и Word

Word => Макросы в Word => Тема начата: Mike_B от 08 Ноябрь 2021, 13:48

Название: Word VBA Макросы. Как с помощью макроса узнать, есть ли в документе Word заданный стиль?
Отправлено: Mike_B от 08 Ноябрь 2021, 13:48

Как с помощью макроса узнать, есть ли в документе Word заданный стиль?

Название: Re: Word VBA Макросы. Как с помощью макроса узнать, есть ли в документе Word заданный стиль?
Отправлено: Администратор от 08 Ноябрь 2021, 13:53

Результат выводится в View - Immediate Window.

Sub Макрос()
   
    Debug.Print StyleIsExists("Обычный")

End Sub

Private Function StyleIsExists(StyleName) As Boolean

    Dim Style As Style
   
    On Error Resume Next
    Set Style = ActiveDocument.Styles(StyleName)
    On Error GoTo 0
    StyleIsExists = Not Style Is Nothing

End Function

Название: Re: Word VBA Макросы. Как с помощью макроса узнать, есть ли в документе Word заданный стиль?
Отправлено: Mike_B от 08 Ноябрь 2021, 14:12

спасибо