![]() |
#5
|
||||
|
||||
![]()
The macro in post #2 assumes each cell has only one paragraph of at least two words. If that's not how your tables are formatted, you'll need to provide more details.
As for the table formats: Code:
Sub SetColumnWidths2() Dim t As Table For Each t In ActiveDocument.Tables t.Columns.DistributeWidth t.Columns(1).Width = CentimetersToPoints(3.75) t.Columns(2).Width = CentimetersToPoints(12) Next t End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
Tags |
search and replace, tables |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
hernans | Word VBA | 5 | 07-02-2018 07:01 PM |
![]() |
smallxyz | Word | 2 | 02-06-2016 02:54 AM |
![]() |
jc491 | Word VBA | 8 | 09-30-2015 06:10 AM |
Find/Replace, Duplicating a word in a sentence to hundreds of sentences. | DDDD | Word | 0 | 10-08-2013 10:48 AM |
Search and Replace - Clear Search box | JostClan | Word | 1 | 05-04-2010 08:46 PM |