|
02-24-2016, 04:44 PM
|
|
Novice
|
|
Join Date: Feb 2016
Posts: 5
|
|
Quote:
Originally Posted by macropod
Try:
Code:
Sub MergeAllTableRows()
Dim Tbl As Table, TblRw As Row
For Each Tbl In ActiveDocument.Tables
For Each TblRw In Tbl.Rows
TblRw.Range.Cells.Merge
Next
Next
End Sub
PS: Please don't resurrect old threads. I've split your post off to a new one, with a link back to the old one. |
Sorry and many thanks!!
|