Mass changing para shadings

[Paul B]

Hi,

I've got a .doc in which all the paras are set to "Pattern: Clear
(White)". What that means is that they have white background
shading.

The styles are home-brewed, meaning they each have lengthy names
indicating their characteristics, such as indent, spacing, etc.

If I Select All, go to Styles and remove borders (which a few
paras have) and shading, it only affects the first para. I know
of no way to affect all the paras at once, not be style
manipulation or by Find/Replace.

Is there any way to do this?

Thanks,
p.

 

[Greg Maxey]

Something like:

Sub ScratchMacro()
Dim oPar As Word.Paragraph
For Each oPar In ActiveDocument.Paragraphs
oPar.Shading.BackgroundPatternColor = wdColorBrightGreen
Next
End Sub

 

[Paul B]

Gorgeous! I used wdcolorautomatic and was home free.

Thanks Greg,

p.

 

[Suzanne S. Barnhill]

If the color is not part of the style, then Ctrl+A, Ctrl+Q should work.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org