Content Controls

[Sammie0Sue]

i have used hundreds of Content Control boxes/fields in my Word doc and I realized I forgot to check the option "Content Control can not be deleted" is there a macro/VBA code that will run through the doc and apply the option to all content control boxes?



I have use drop down boxes and rich text boxes only

[Charles Kenyon]

I'm sure one can be written. I don't have one on the shelf.
You might want to change the title of your question to make it more specific:
"Change all Content Controls in a document to non-deletion using VBA" would be a suggestion.

One other thing is I would suggest that you want a document template rather than a document if you are going to be using this to generate new documents. Templates in Microsoft Word

[Sammie0Sue]

Thanks for the suggestions but the form I am creating is the template

You will see I have updated the title as asked

[Charles Kenyon]

Originally Posted by Sammie0Sue

Thanks for the suggestions but the form I am creating is the template

You will see I have updated the title as asked

Nope, I don't see it.

[Charles Kenyon]

The following might work:

Sub ChangeCCToNoDelete()
    ' Macro to set all Content Controls to locked (no delete)
    ' Written by Charles Kenyon 2013-11-06
    Dim oCC As ContentControl
    For Each oCC In ActiveDocument.ContentControls
        oCC.LockContentControl = True
    Next oCC
End Sub

See Installing Macros for direction on how to use this.

I have not tested this extensively, but it seems to work.

[Sammie0Sue]

Thank I will give it a try!

[Sammie0Sue]

Wonderful thank you it has worked!!