摘要：
用宏批量更改表格的宽度'Alt+F11,插入模块Sub BatchChangeTableStyle() Dim oTable As Table For Each oTable In ActiveDocument.Tables oTable.Columns(2).Width = CentimetersToPoints(15) Next Set oTable = Nothing MsgBox "完成！"End Sub 阅读全文
