在 word 中一次选中全部表格的方法 - 百度经验 在弹出的代码编辑框中，在光标处输入代码： 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