Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.tables
|
|||
|
|||
Find and Replace Table Styles
Is it possible to find and replace table styles within Word 2007? I
have a number of small tables in a section of my document that I want to convert from using a built in table style to a custom style that I have subsequently defined. Going into the standard Find/Replace dialog gives options to search on paragraph styles, but not for table styles. Is this possible, outside of opening up the XML and tweaking things outside of Word? Thanks for the help! David |
#2
Posted to microsoft.public.word.tables
|
|||
|
|||
Find and Replace Table Styles
The following macro should work:
Sub FindAndReplaceTableStyles() Dim t As Table For Each t In ActiveDocument.Tables If t.Style.NameLocal = "Light Shading - Accent 3" Then t.Style = "Medium Shading 1" End If Next t End Sub The example applies the "Medium Shading 1" style to all tables in the *document* that are currently using the "Light Shading - Accent 3" style. Of course, you will have to change the style names to the ones that are relevant for you. If you want to replace the table styles in the *selection*, use Selection.Tables instead of ActiveDocument.Tables in the code. See also http://www.gmayor.com/installing_macro.htm. -- Stefan Blom Microsoft Word MVP "David" wrote in message ... Is it possible to find and replace table styles within Word 2007? I have a number of small tables in a section of my document that I want to convert from using a built in table style to a custom style that I have subsequently defined. Going into the standard Find/Replace dialog gives options to search on paragraph styles, but not for table styles. Is this possible, outside of opening up the XML and tweaking things outside of Word? Thanks for the help! David |
#3
Posted to microsoft.public.word.tables
|
|||
|
|||
Find and Replace Table Styles
On Feb 8, 2:18*am, "Stefan Blom" wrote:
The following macro should work: Thanks, Stefan. That did the trick. My first tentative step into macro-izinig my default template has been taken! David |
#4
Posted to microsoft.public.word.tables
|
|||
|
|||
Find and Replace Table Styles
I'm glad I could help.
-- Stefan Blom Microsoft Word MVP "David" wrote in message ... On Feb 8, 2:18 am, "Stefan Blom" wrote: The following macro should work: Thanks, Stefan. That did the trick. My first tentative step into macro-izinig my default template has been taken! David |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Find+Replace Dialog Box, Replace with Format problem | Microsoft Word Help | |||
Find and replace won't work in a table | Microsoft Word Help | |||
Find multiple characters in one find using MSword find/replace | Microsoft Word Help | |||
Using find and replace or macros to replace page ranges | Microsoft Word Help | |||
Find/ Replace is auto-capping the words I want to replace with | Microsoft Word Help |