Reply
 
Thread Tools Display Modes
  #1   Report Post  
Posted to microsoft.public.word.tables
Doctor Document Doctor Document is offline
external usenet poster
 
Posts: 1
Default How to change style of all tables in a document at once?

I'm copying tables from many documents and sources outside word and pasting
them into a single word document. When I want to apply a uniform formatting
throughout my new document I find myself manually selecting each table using
the 'Goto' button and applying the table styles to each table.

There are over 300 tables in this document. What's the easier way out? I
have to make twelve other documents similar to this one. Is there a way to
define a pasting formatting for tables? Anyone please help.
  #2   Report Post  
Posted to microsoft.public.word.tables
Stefan Blom[_3_] Stefan Blom[_3_] is offline
external usenet poster
 
Posts: 6,897
Default How to change style of all tables in a document at once?

You could use a macro such as the following:

Sub ApplyTableStyle()
Dim t As Table
For Each t In ActiveDocument.Tables
t.Style = "Light Shading - Accent 3" 'Specify table style name here
Next t
End Sub

--
Stefan Blom
Microsoft Word MVP



"Doctor Document" Doctor wrote in
message ...
I'm copying tables from many documents and sources outside word and
pasting
them into a single word document. When I want to apply a uniform
formatting
throughout my new document I find myself manually selecting each table
using
the 'Goto' button and applying the table styles to each table.

There are over 300 tables in this document. What's the easier way out? I
have to make twelve other documents similar to this one. Is there a way to
define a pasting formatting for tables? Anyone please help.



  #3   Report Post  
Posted to microsoft.public.word.tables
L. Gautero[_2_] L. Gautero[_2_] is offline
external usenet poster
 
Posts: 1
Default How to change style of all tables in a document at once?

Dear Stefan,

Thanks for the suggestion, unfortunately in my case, it is not performing
well, in fact the table keep other styles, especially when the contents of
the table (objects as MS Equation) have a style on their own.

basically the whole table is presented having the style of its content.
Is there a way to make this more ordered?
(i.e. a table has its style, independetly from the style of the content of
the cells)

regards

"Stefan Blom" wrote:

You could use a macro such as the following:

Sub ApplyTableStyle()
Dim t As Table
For Each t In ActiveDocument.Tables
t.Style = "Light Shading - Accent 3" 'Specify table style name here
Next t
End Sub

--
Stefan Blom
Microsoft Word MVP



"Doctor Document" Doctor wrote in
message ...
I'm copying tables from many documents and sources outside word and
pasting
them into a single word document. When I want to apply a uniform
formatting
throughout my new document I find myself manually selecting each table
using
the 'Goto' button and applying the table styles to each table.

There are over 300 tables in this document. What's the easier way out? I
have to make twelve other documents similar to this one. Is there a way to
define a pasting formatting for tables? Anyone please help.



.

  #4   Report Post  
Posted to microsoft.public.word.tables
Stefan Blom[_3_] Stefan Blom[_3_] is offline
external usenet poster
 
Posts: 6,897
Default How to change style of all tables in a document at once?

Well, you could use a macro to format the contents of cells as well.

Of course, since there are many factors to consider, this might be tricky or
at least time-consuming. In particular, I don't know how to modify equations
using VBA (if it's even possible).

--
Stefan Blom
Microsoft Word MVP



"L. Gautero" wrote in message
...
Dear Stefan,

Thanks for the suggestion, unfortunately in my case, it is not performing
well, in fact the table keep other styles, especially when the contents of
the table (objects as MS Equation) have a style on their own.

basically the whole table is presented having the style of its content.
Is there a way to make this more ordered?
(i.e. a table has its style, independetly from the style of the content of
the cells)

regards

"Stefan Blom" wrote:

You could use a macro such as the following:

Sub ApplyTableStyle()
Dim t As Table
For Each t In ActiveDocument.Tables
t.Style = "Light Shading - Accent 3" 'Specify table style name here
Next t
End Sub

--
Stefan Blom
Microsoft Word MVP



"Doctor Document" Doctor wrote in
message ...
I'm copying tables from many documents and sources outside word and
pasting
them into a single word document. When I want to apply a uniform
formatting
throughout my new document I find myself manually selecting each table
using
the 'Goto' button and applying the table styles to each table.

There are over 300 tables in this document. What's the easier way out?
I
have to make twelve other documents similar to this one. Is there a way
to
define a pasting formatting for tables? Anyone please help.



.




Reply
Thread Tools
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
how do you change the margin of all tables in a document at once? +Brian Tables 1 October 23rd 07 09:48 PM
Change normal style without affecting tables Amy Tables 2 March 5th 07 09:34 PM
Change template style in master document? Susann Microsoft Word Help 2 July 28th 06 03:42 PM
How do I change numbering style in a document crystal Microsoft Word Help 1 December 6th 05 12:47 PM
Change document to book style pages Karen D. Page Layout 1 November 11th 05 12:10 AM


All times are GMT +1. The time now is 09:34 AM.

Copyright ©2000 - 2023, Jelsoft Enterprises Ltd.
Copyright 2004-2023 Microsoft Office Word Forum - WordBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Word"