AxMath的下载与安装
下载AxMath
链接:https://pan.baidu.com/s/1VLgMhoG2J_QEuOSAYq_RFw
提取码:e9eo
安装的时候将Cracker里的文件复制到AxMath的安装包里即可,点击替换即可
如果你使用的是Office word,那么你就可以直接使用AxMath的功能了
如果你使用的是WPS 2019,那么你需要执行以下操作,才能使用AxMath的功能
下载VPA For WPS 2019
链接:https://pan.baidu.com/s/1A8WfMf1XOT7LsanbzWlIUg
提取码:7qdh
安装的时候按照1,2,3,4的顺序即可
安装完成后,重新打开wps就可以正常使用AxMath了
开发工具—>宏—>给宏命名—>创建:
VB编辑器:
将如下代码粘贴进去:
Sub 批量修改表格()
'
' 批量修改表格 Macro
' 宏由 zsz 录制,时间: 2020/05/07
'
'
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
如下图
关闭VB编辑器,并在要使用宏的文档中开发工具—>宏—>批量修改表格(选择自己创建的宏)—>运行
则文档中全部表格被选中,可对表格进行批量修改样式等操作:
注意 如果文档页数过多 会响应过慢 等待即可
转载:https://blog.csdn.net/pang787559613/article/details/105984514
https://blog.csdn.net/kieson_uabc/article/details/108175938