Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.tables
|
|||
|
|||
Fill color in tables
Hi,
I have document with lot of tabels and I need change fill color in each table to no-fill. How can I change fill color in all tables in document at once ? I hope you know what i mean, I am from Slovakia and I have Slovak Word. I have Word XP. Thanx. KADO |
#2
Posted to microsoft.public.word.tables
|
|||
|
|||
Fill color in tables
Hi Kado,
I have document with lot of tabels and I need change fill color in each table to no-fill. How can I change fill color in all tables in document at once ? I hope you know what i mean, I am from Slovakia and I have Slovak Word. I have Word XP. Unless you happen to be using a Table Style (doubtful, but one never knows) there's no way to do this quickly, except with the help of a macro. Here's an example: Sub RemoveTableShading() Dim tbl As Word.Table For Each tbl In ActiveDocument.Tables tbl.Rows.Shading.BackgroundPatternColor = wdColorAutomatic tbl.Rows.Shading.ForegroundPatternColor = wdColorAutomatic Next tbl End Sub Cindy Meister INTER-Solutions, Switzerland http://homepage.swissonline.ch/cindymeister (last update Jun 8 2004) http://www.word.mvps.org This reply is posted in the Newsgroup; please post any follow question or reply in the newsgroup and not by e-mail :-) |
#3
Posted to microsoft.public.word.tables
|
|||
|
|||
Fill color in tables
Hi Cindy,
Thank you, macro works fine. Thank you very much. KADO Cindy M -WordMVP- wrote / napísal(a): Hi Kado, I have document with lot of tabels and I need change fill color in each table to no-fill. How can I change fill color in all tables in document at once ? I hope you know what i mean, I am from Slovakia and I have Slovak Word. I have Word XP. Unless you happen to be using a Table Style (doubtful, but one never knows) there's no way to do this quickly, except with the help of a macro. Here's an example: Sub RemoveTableShading() Dim tbl As Word.Table For Each tbl In ActiveDocument.Tables tbl.Rows.Shading.BackgroundPatternColor = wdColorAutomatic tbl.Rows.Shading.ForegroundPatternColor = wdColorAutomatic Next tbl End Sub Cindy Meister INTER-Solutions, Switzerland http://homepage.swissonline.ch/cindymeister (last update Jun 8 2004) http://www.word.mvps.org This reply is posted in the Newsgroup; please post any follow question or reply in the newsgroup and not by e-mail :-) |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Problem with embedded Excel tables viewed as images | Tables | |||
Changing format of multiple pre-created tables | Microsoft Word Help | |||
When joining tables, table sections shift left or right. | Tables | |||
Fill colours for tables cells (Word 97) | Tables | |||
Is there a way to "join" tables in Word 2003? | Tables |