View Single Post
  #2  
Old April 2nd, 2010, 08:49 AM posted to microsoft.public.word.tables
Graham Mayor
external usenet poster
 
Posts: 18,297
Default Copy row Properties

You could use a macro to format the tables

The following will format all the first rows to have a 25% grey background
and Verdana Bold font

Dim oDoc As Document
Dim oTable As Table
Set oDoc = ActiveDocument
On Error Resume Next
For Each oTable In ActiveDocument.Tables
With oTable.Rows(1).Range
.Font.Name = "Verdana"
.Bold = True
.Shading.BackgroundPatternColor = wdColorGray25
End With
Next oTable

This will work provided none of the first rows have vertically merged cells.
Tables that have such merged header cells will be ignored.

http://www.gmayor.com/installing_macro.htm

--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org



"Maanu" wrote in message
...
I have changed the first row properties of a table to make it the table
header. I changed its color to grey and changed font to verdana + bold.

I want to change the first row properties of all other tables(around 200
tables) in the document in the same way. I used paste special
functionality
to chage the row properties of all other tables. But nothing happened.

Is there any meachanisms for doing this?

Thanks!