Display Navigation and Styles Panes in 365/2021

Charles Kenyon · #1 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!

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Quick Styles display changed - just an alert	Charles Kenyon	Word	2	11-22-2021 03:04 PM
Unable to connect Styles to the Navigation column.	Balliol	Word	5	08-04-2019 04:25 AM
Using the Navigation Pane with modified styles	susandickerson	Word	3	07-10-2014 08:35 PM
How to Customize Outlook Panes	Steve_B	Outlook	0	07-08-2014 09:05 AM
Can't Display "Recently Used Styles" in Styles Pane	mwildem	Word	2	05-23-2012 01:42 PM