Microsoft Office Forums - View Single Post - [Solved] Display Navigation and Styles Panes in 365/2021

Charles Kenyon · 06-05-2023, 05:22 AM

Quote:

Originally Posted by Guessed

This appears to work on my Word 2016 and 365 machines

Code:

    With Application.CommandBars("Navigation")
        .Width = 300 ' set to whatever you want - the default seems wide at 400
        .Visible = True
        .Position = msoBarLeft
    End With
    'Application.TaskPanes(wdTaskPaneFormatting).Visible = True
    With Application.CommandBars("Styles")
      .Visible = True
      .Position = msoBarRight
      .Width = 600
    End With

I wish it would on mine!

00 deleteme 6.png

If I comment out the line with visible, it will run but the Styles Pane is not visible. With the TaskPanes line, it will become visible, however the .Width property is not applied.

When I try it in Safe Mode on 365, it works, sort of!
It halts on the first line. If I display and then hide the Navigation and Styles Panes, it runs and works.
If I display and then hide only the Navigation Pane, it halts on the Styles CommandBar.
Time for some debugging!