如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
1、单击文件-选项-自定义功能区,然后如下图示勾选开发工具选项。2.点击任务栏“开发工具选项”,再点击录制宏。弹出如下窗口,点击确定。然后点击任务栏下方的暂停录制。3、点击任务栏下方的“宏”选项,弹出如下窗口后,再点击编辑,将复制如下代码替换里面的代码关闭即可。代码:Sub全选表格()DimtempTableAsTableApplication.ScreenUpdating=FalseIfActiveDocument.ProtectionType=wdAllowOnlyFormFieldsThenMsgBox"文档已保护,此时不能选中多个表格!"ExitSubEndIfActiveDocument.DeleteAllEditableRangeswdEditorEveryoneForEachtempTableInActiveDocument.TablestempTable.Range.Editors.AddwdEditorEveryoneNextActiveDocument.SelectAllEditableRangeswdEditorEveryoneActiveDocument.DeleteAllEditableRangeswdEditorEveryoneApplication.ScreenUpdating=TrueEndSub4、然后就可以单击“宏”运行之后就可以选中文档里面的所有表格了。111111111111111111111111111111111111111111