WPS Word纸张方向更改后为何相互间变得参差不齐，有什么简便办法调整标尺统一么？
发布网友
发布时间：2022-05-13 13:07
共1个回答
热心网友
时间：2023-10-10 08:02
这是由于你的表格的对齐方式不同造成的，有的是左对齐，有的是居中对齐
在开发工具菜单中点查看代码，在左栏点开Project——WPS文字 对象
输入下面的代码，点运行宏，就可以一次性选中所有表格，关闭代码窗口，可以看到所有表格被选中了，点表格工具，表格属性，将对齐方式修改为左对齐，确定。
Sub 批量修改表格()
Dim tempTable As Table
Application.ScreenUpdating = False
If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then
MsgBox "文档已保护，此时不能选中多个表格！"
Exit Sub
End If
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
For Each tempTable In ActiveDocument.Tables
tempTable.Range.Editors.Add wdEditorEveryone
Next
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub
