Formatting Multiple Tables at Once

Occasional Visitor

Hello,

 

I have a ~1000 page document with ~100 tables that will need to be inserted within by several groups of consultants using One Drive.

 

I want to be able to format all the tables at once or create a formatted style so when a consultant needs to paste there table into the shared document that it adheres to the formatted guidelines in the table.

 

Right now, I've added the macro:

Sub Set_Global_Table_Width() Dim pT As Word.Table For Each pT In ActiveDocument.Tables pT.PreferredWidthType = wdPreferredWidthPercent pT.PreferredWidth = 75

 

I've also created a table design style that will be the default design for the document.

 

My question is; are there any other macros that could ease in formatting or anything I might be missing?

 

Cheers,

 

BP

0 Replies