Loop and Update Content Controls with value

[vss712]

Hello,
I have several content controls with the same name within a document and in the headers and footers.


I'd like to loop through all controls with the name "AccountName" and update the content with a specific value.
Not certain how to do this for more than one content control, and also, it looks as though it is different in footers, headers and the main document.
can you please advise ?
Thanks

[Guessed]

A loop would not be required if you linked them all to the same xml node. However, the code to loop would look something like this

Sub CCLoader()
  Dim aCC As ContentControl
  For Each aCC In ActiveDocument.ContentControls
    If aCC.Title = "AccountName" Then
      aCC.Range.Text = "hi mum"
    End If
  Next
End Sub

[gmayor]

For linking them see http://gregmaxey.com/word_tip_pages/...ntent_Controls

[vss712]

Thank you, Andrew. That works for the main Document, but doesn't work in Headers and Footers : (

[Guessed]

Try

Sub CCLoader()
  Dim aCC As ContentControl, aRng As Range
  For Each aRng In ActiveDocument.StoryRanges
    For Each aCC In aRng.ContentControls
      If aCC.Title = "aaa" Then
        aCC.Range.Text = "hi mum"
      End If
    Next aCC
  Next aRng
End Sub

[vss712]

Thank you, Andrew - works everywhere except the header.... I haven't tried the footer though.
How is the header differentiated here ?
How do we access it for updating ?
Thanks!

[vss712]

PS -
Each of the controls for "AccountName" are bounding boxes. I ensure they are unlocked:

Still no luck with anything in the Page Headers. I do have Initial Page Header set to none, so the page header resides in another section, if that makes a difference.

Sub CCLoaderHiMum()
Dim aCC As ContentControl, aRng As Range

For Each aRng In ActiveDocument.StoryRanges


For Each aCC In aRng.ContentControls

If aCC.Title = "AccountName" Then
aCC.LockContents = False
aCC.Range.Text = "hi mum"
aCC.Range.Font.ColorIndex = wdBlack
aCC.LockContents = True
End If

Next aCC

Next aRng
End Sub

[Guessed]

If the second code sample I provided doesn't catch the CC in a header then I would guess that those CCs may be sitting inside a text box. We would need to see your document to work it out. Post a sample document if you want to resolve this.

Alternatively, explore the earlier suggestion of linking the CCs to an xml node and then change the value of that node.