Может кто-нибудь помочь мне исправить этот макрокод? Все отлично, кроме изменения размера панели

Question

Я пытаюсь сделать макрос для автоматического открытия и изменения размера панелей стилей навигации при открытии (глобально). Я могу заставить его работать, за исключением изменения размера панели стилей. К сожалению, копирование кода, который изменяет размер панели навигации, в панель стилей не работает :( Вы можете увидеть выделенный раздел и сообщение об ошибке здесь.. Может ли кто-нибудь помочь мне это исправить?

Sub AutoOpen()

Call PaneFixNav
Call PaneFixStyle

End Sub

Sub PaneFixNav()

Application.CommandBars("Navigation").Visible = True
    Dim iWidth As Integer
    iWidth = 250
        With CommandBars("Navigation")
            .Width = iWidth
        End With

End Sub

Sub PaneFixStyle()

Application.TaskPanes(wdTaskPaneFormatting).Visible = True
    Dim iWidth As Integer
    iWidth = 250
        With Application.TaskPanes(wdTaskPaneFormatting)
            .Width = iWidth
        End With

End Sub

Ps. У меня по сути нет опыта работы с макросами, кроме этого, который я собрал из разных постов. Так что извините за, возможно, глупый вопрос.

Answer 1

К сожалению, встроенные закрепляемые панели задач Microsoft Word нельзя изменять программно.

С помощью VBA во время выполнения можно изменять размер только модальных и немодальных пользовательских форм (диалогов).