Word VBA Макросы. Как применить стиль к таблице с помощью макроса?

[Посетитель]

В документе есть стиль "Таблица Отчет4".
Как применить этот стиль к таблице, внутри которой находится текстовый курсор?

[Администратор]

Sub Макрос()
    Selection.Tables(1).Style = "Таблица Отчет4"
End Sub

[Посетитель]

спасибо