Hi Chuck,

Install this macro (see http://www.gmayor.com/installing_macro.htm if
necessary) and run it while a *copy* of the original file is open:

Sub TableNoShades()
Dim oTbl As Table
For Each oTbl In ActiveDocument.Tables
With oTbl.Shading
.Texture = wdTextureNone
.BackgroundPatternColor = wdColorAutomatic
.ForegroundPatternColor = wdColorAutomatic
End With
Next oTbl
End Sub

--
Regards,
Jay Freedman
Microsoft Word MVP FAQ: http://word.mvps.org

Chuck Martin wrote:
I have a large document that contains almost all tables, a document
that was automatically generated. That autmatic generation created
background shafding in all the header cells of the tables.

I want to rid the tables of the background shading. I am not able to.

When I select all the tables, go to Format Borders and Shading, go
to the Shading tab, select No Fill, and click OK, nothing changes.

I wanted to use Search and Replace, but the Find options do not
include options for text that ha background shading.

I can select a single table or single rows and apply the No Fill
option and remove the shading, but doing this manually in this
document is not an option; there are hundreds of tables on hundreds
of pages. An Internet search led me to no clues.

Suggestions, please?

I am using Word 2003 on a WinXP Pro box with a 3+GHz processor, 1GB of
RAM, and plenty of disk space. The documetn itself is nearly 900 pages
and 38MB in size.

--