WORD中100多个表格怎样调整，调整一个其它也变了

WORD中100多个表格怎样调整，调整一个其它也变了

按ALT+F11,点插入模块，复制代码，按F5运行
Sub 选中所有表格()
Dim tempTable As Table
Application.ScreenUpdating = False
'判断文档是否被保护
IfActiveDocument.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
EndSub

没看懂什么意思？