StyleAreaPane AutoSize

[Coco86]

Dear guys!



I am using Microsoft 365!

Thanks to a small makro by Charley Kenyon I was already able to "autosize" my "navigation pane" (on the left side of the window), by using the script:

Sub NavigationPaneSize()

Dim iWidth As Integer
iWidth = 300 ' change to suit
With Application.CommandBars("Navigation")
.Visible = True
.Width = iWidth
End With

End Sub


Now I would like to do the same with the "Style Area Pane" (on the right side)! Would it be possible also?

Thanks in advance!

Yours, Seba