AHK快捷键（18）——选中文档中的所有表

#a::

{

wps := GetKwps()

wps.ActiveDocument.DeleteAllEditableRanges(-1)

for i in wps.ActiveDocument.Tables {

i.Range.Editors.Add(-1)

}

wps.ActiveDocument.SelectAllEditableRanges(-1)

wps.ActiveDocument.DeleteAllEditableRanges(-1)

wps := ""

}