Autofit
Run a macro containing the following code
Dim i As Long
With ActiveDocument
For i = 1 To .Tables.Count
.Tables(i).AutoFitBehavior = True
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
"Maya" wrote in message
...
In Word 2007 i want to use Auto fit to fit more than one table in the
document, I dont want to go one by one for each table and click autofit.
Is
there a way to do autofit in 1 click for all tables in a document?
|