誰かこのマクロコードを修正するのを手伝ってくれませんか?ペインのサイズ変更以外はすべて完璧です

誰かこのマクロコードを修正するのを手伝ってくれませんか?ペインのサイズ変更以外はすべて完璧です

ナビゲーション スタイル ペインを開いたときに自動的に開いてサイズを変更するマクロを作成しようとしています (グローバル)。スタイル ペインのサイズ変更を除いて、動作させることができます。残念ながら、ナビゲーション ペインのサイズを変更するコードをスタイル ペインにコピーしても機能しません :( ハイライトされたセクションとエラーメッセージはここで確認できます誰かこれを修正するのを手伝ってくれませんか。

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

P.S. マクロについては、基本的にこれ以外の経験はありません。これは、さまざまな投稿から集めたものです。愚かな質問かもしれませんので、ご容赦ください。

答え1

残念ながら、Microsoft Word に組み込まれているドッキング可能なタスク ウィンドウはプログラムでサイズを変更することはできません。

VBA では、実行時にサイズ変更できるのは、カスタム モーダルおよび非モーダル ユーザー フォーム (ダイアログ) のみです。

関連情報