![]() |
|
#2
|
|||
|
|||
|
Hi, Woocash_11! Try this:
Code:
Sub Tbls_Format_1()
'Format all tables in active doc.
Dim oTbl As word.Table
For Each oTbl In ActiveDocument.Tables
oTbl.rows.HeightRule = wdRowHeightAtLeast
Next oTbl
End Sub
|
| Tags |
| height, table rows, vba |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Excel 2003: VBA "Function" causes "#VALUE!" errors after running "insert/delete row" custom macro | Matt C | Excel Programming | 2 | 01-08-2022 06:03 AM |
Help get rid of weird default "lines" or "table" look in document that has no tables or lines
|
Tsavard | Word | 2 | 06-11-2018 09:08 AM |
Macro to delete all rows with the word "Total"
|
RandWald | Excel Programming | 4 | 11-28-2016 07:50 PM |
Word Macro to find and delete rows that contain adjacent cells containing "."
|
AlexanderJohnWilley | Word VBA | 7 | 11-08-2012 10:15 AM |
How to choose a "List" for certain "Heading" from "Modify" tool?
|
Jamal NUMAN | Word | 2 | 07-03-2011 03:11 AM |