Word 2007: Change font & colour of CC placeholder text using VBA?

[Ailish]

Hi,

Is it possible to use VBA to assign a font and colour to contentcontrol
placeholder text that is different to the default font and colour?

I want to use it in conjunction with the code below which restores
placeholder text that had previously been removed to provide a "cleaner"
print-out of a document where not all contentcontrols had been used. It's
just that my original placeholder text was a paler grey and smaller font.

Thanks,
Ailish

For Each cc In ActiveDocument.ContentControls

If InStr(cc.Tag, "txt") And cc.ShowingPlaceholderText Then
cc.SetPlaceholderText , , "(T)"
ElseIf InStr(cc.Tag, "cmb") And cc.ShowingPlaceholderText Then
cc.SetPlaceholderText , , "(C)"
ElseIf InStr(cc.Tag, "DP") And cc.ShowingPlaceholderText Then
cc.SetPlaceholderText , , "(DP)"
ElseIf InStr(cc.Tag, "Drop") And cc.ShowingPlaceholderText Then
cc.SetPlaceholderText , , "(D)"
End If

 

[Greg Maxey]

Ailish,

Something like:

cc.Range.Font.Color = wdColorRed

 

[Ailish]

Thanks Greg

Ailish,

Something like:

cc.Range.Font.Color = wdColorRed




--
Greg Maxey

See my web site http://gregmaxey.mvps.org
for an eclectic collection of Word Tips.