Форум по VBA, Excel и Word
Word => Макросы в Word => Тема начата: Mike_B от 08 Ноябрь 2021, 13:48
-
Как с помощью макроса узнать, есть ли в документе Word заданный стиль?
-
Результат выводится в 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
-
спасибо