vba调整word中表格的列宽

可以使用VBA代码来调整Word中表格的列宽。具体的代码可以参考以下示例：

Sub AdjustTableColumnWidth()
Dim tbl As Table
Dim col As Column
Set tbl = ActiveDocument.Tables(1)
For Each col In tbl.Columns
col.Width = InchesToPoints(1.5) '将列宽设置为1.5英寸
Next col
End Sub

这个代码将第一个表格中的每一列的宽度都设置为1.5英寸。你可以根据需要修改代码中的数值来调整列宽。