Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.tables
|
|||
|
|||
How do I change a table cell color globally?
I have a table with color coded cells. I would like to change all the green
cells to a different color. Is there anyway I can change all the green cells globally or do I have to select and change the color of each cell individually? Thank you -- stateworker |
#2
Posted to microsoft.public.word.tables
|
|||
|
|||
How do I change a table cell color globally?
Run a macro containing the following code when the cursor is in the table
Dim i As Long Dim j As Long With Selection.Tables(1) For i = 1 To .Rows.Count For j = 1 To .Columns.Count With .Cell(i, j).Shading If .BackgroundPatternColorIndex = wdGreen Then .BackgroundPatternColorIndex = wdRed End If End With Next j Next i End With See the article "What do I do with macros sent to me by other newsgroup readers to help me out?" at: http://www.word.mvps.org/FAQs/Macros...eateAMacro.htm -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "CA_stateworker" wrote in message ... I have a table with color coded cells. I would like to change all the green cells to a different color. Is there anyway I can change all the green cells globally or do I have to select and change the color of each cell individually? Thank you -- stateworker |
#3
Posted to microsoft.public.word.tables
|
|||
|
|||
How do I change a table cell color globally?
Hi --
I would like to do something similar with 30 tables in a document, but I want to change the table width so that column 1 is 1.25" and column 2 is 4.75". Can you offer me a simple way to accomplish this? Thanks Rich "Doug Robbins - Word MVP on news.microsoft.com" wrote in message ... Run a macro containing the following code when the cursor is in the table Dim i As Long Dim j As Long With Selection.Tables(1) For i = 1 To .Rows.Count For j = 1 To .Columns.Count With .Cell(i, j).Shading If .BackgroundPatternColorIndex = wdGreen Then .BackgroundPatternColorIndex = wdRed End If End With Next j Next i End With See the article "What do I do with macros sent to me by other newsgroup readers to help me out?" at: http://www.word.mvps.org/FAQs/Macros...eateAMacro.htm -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "CA_stateworker" wrote in message ... I have a table with color coded cells. I would like to change all the green cells to a different color. Is there anyway I can change all the green cells globally or do I have to select and change the color of each cell individually? Thank you -- stateworker |
#4
Posted to microsoft.public.word.tables
|
|||
|
|||
How do I change a table cell color globally?
Dim i As Long
With ActiveDocument For i = 1 To .Tables.Count With .Tables(i) .Columns(1).Width = InchesToPoints(1.25) .Columns(2).Width = InchesToPoints(4.75) End With Next i End With -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Richard Morey" wrote in message ... Hi -- I would like to do something similar with 30 tables in a document, but I want to change the table width so that column 1 is 1.25" and column 2 is 4.75". Can you offer me a simple way to accomplish this? Thanks Rich "Doug Robbins - Word MVP on news.microsoft.com" wrote in message ... Run a macro containing the following code when the cursor is in the table Dim i As Long Dim j As Long With Selection.Tables(1) For i = 1 To .Rows.Count For j = 1 To .Columns.Count With .Cell(i, j).Shading If .BackgroundPatternColorIndex = wdGreen Then .BackgroundPatternColorIndex = wdRed End If End With Next j Next i End With See the article "What do I do with macros sent to me by other newsgroup readers to help me out?" at: http://www.word.mvps.org/FAQs/Macros...eateAMacro.htm -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "CA_stateworker" wrote in message ... I have a table with color coded cells. I would like to change all the green cells to a different color. Is there anyway I can change all the green cells globally or do I have to select and change the color of each cell individually? Thank you -- stateworker |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Word 2007 table cell color selection | Tables | |||
change color of cell based upon form drop down selection | Tables | |||
Can I easily globally change the color of all hyperlinks? | Microsoft Word Help | |||
Need to add fill color to a table cell | Tables | |||
Change cell height in one cell only in a table | Tables |