Content control titles

jillapass · #1 05-29-2012, 04:01 AM

Rather than refer to my content controls as .contentcontrol(3) (for example) and I refer to them by the title I have given them.

In some of my documents I have about 100 content controls and using numbers is rather difficult to read.

Thanks

macropod · #2 05-29-2012, 05:31 AM

Is there an issue here?

jillapass · #3 05-29-2012, 05:56 AM

Sorry, failed to explain.
I give each of my content controls a title in the properties.
Is it possible for me to update these using the title rather than the number.

eg

I currently have

field = activedocument.contentcontrols(1).range.text

what I want to do is

field = activedocument.contentcontrols("title").range.text

But, this doesn't work.

Is this possible, and if so what should the syntax be.

Thanks

macropod · #4 05-29-2012, 06:11 AM

AFAIK, the only way to use the title directly is to loop through the collection:

Code:

Dim CCtrl As ContentControl
For Each CCtrl In ActiveDocument.ContentControls
  If CCtrl.Title = "My Title" Then
    'do something
  End If
Next

If you were doing a lot of Content Control processing in code, rather than interactively, you might get a performance improvement if you store the collection in code first:

Code:

Sub Demo()
Dim CCtrlSet As Variant, CCtrl As ContentControl
Set CCtrlSet = ActiveDocument.ContentControls
For Each CCtrl In CCtrlSet
  If CCtrl.Title = "My Title" Then
    'do something
  End If
Next
Set CCtrlSet = Nothing
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Move to next content control	cksm4	Word VBA	13	07-02-2019 07:48 PM
Rich Text Content Control - Allow User Formatting	keithacochrane	Word	1	05-28-2012 05:06 PM
Retrieving content control value	jillapass	Word VBA	4	05-24-2012 05:07 AM
content control Word 2007	TessaLee	Word	1	03-11-2011 12:51 AM
Templates: automatic text generation from Rich Text content control	Chickenmunga	Word	0	10-01-2008 11:16 AM