Set width of Styles pane?

NitroPress · #1 06-17-2021, 11:24 AM

I have a setup macro that puts the Navigation pane on the left, at a defined width, and the Styles pane on the right, again at a preferred width, and then sets the page size. Under Office 2010, I had this working, but with the forced update (I went to 2016), I'm stuck.

Nav pane up, check. Set width using:

Code:

With Application.CommandBars("Navigation")
        .Visible = True
        .Width = iWidth
     End With

...no problem.

Scale page zoom, no problem.

Open Styles pane with:

Code:

Application.TaskPanes(wdTaskPaneFormatting).Visible = True

...no problem.

But even with several years of VBA hacking and Mansfield's fat book at hand, I can't figure out how to set the width of the Styles pane.

Specific answer appreciated; some hints about how to chase the object list for "task panes" (instead of CommandBars, for example) appreciated...

Guessed · #2 06-17-2021, 04:43 PM

You were close

Code:

  With Application
      .TaskPanes(wdTaskPaneFormatting).Visible = True
      .CommandBars("Styles").Position = msoBarRight
      .CommandBars("Styles").Width = 400
  End With

I found the clue to shift to CommandBars here Keeping the Styles Pane Open by Default (Microsoft Word)

For some hints that explore the vba Task Pane limits, here is another link. Although it appears to have been written in 2004, Word's development tends to move at a glacial pace so it is probably still current. Word’s Task Panes VBA Reference – Content

NitroPress · #3 06-17-2021, 04:55 PM

Aces, thanks!

It's those switches in object name that throw me.

Guessed · #4 06-17-2021, 05:00 PM

And it is a good thing that logic breaks throw you - it shouldn't make sense to switch objects.

You would think with the resources that MS have, someone would be tasked with fixing omissions and inconsistencies like this in the VBA object model

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Word 2010 - Styles pane has disappeared	NitroPress	Word	5	11-21-2019 04:16 PM
How to have one custom styles pane for all documents?	deazzxe	Word	1	04-09-2019 05:20 AM
Two much blank space between names of styles in the Styles Pane	PereCasanellas	Word	0	10-06-2017 03:47 AM
Using the Navigation Pane with modified styles	susandickerson	Word	3	07-10-2014 08:35 PM
Can't Display "Recently Used Styles" in Styles Pane	mwildem	Word	2	05-23-2012 01:42 PM