Trying to uncheck Limit formatting to permitted styles in Word document

[jec1]

Hi,



The below macros works fine - but when I try to uncheck Limit formatting to permitted styles

Runtime error 5 - Debug
CommandBars("Restrict Editing").Visible = False does not work - any ideas please?

Sub AttachUCPRStyles1()

‘Call jec_StylesHide

With ActiveDocument
.UpdateStylesOnOpen = True
.AttachedTemplate = "C:\Users\janin\AppData\Roaming\Microsoft\Template s\UCPR v1.dotx"
.UpdateStylesOnOpen = False
.AttachedTemplate = "Normal"
End With

CommandBars("Restrict Editing").Visible = False

‘Call SetStylesPaneToAllAlphabetical

End Sub

[gmayor]

How about

ActiveDocument.Unprotect

[jec1]

Hi Graham

No, it does not uncheck Limit formatting...

There is no password on these forms they come in from service providers and need some cleaning up.

Thank you.