Como posso selecionar todas as tabelas no Word, de preferência sem software externo?

Question

Destinado ao Word 2007/2010, este não ajuda para o Word 2016. Por quê? Não posso selecionar todas as tabelas no Word 2016 sem software externo?

Use um código VBA para selecionar todas as tabelas no documento

Passo 1: Pressione "Alt-F11" para abrir a janela Microsoft Visual Basic for Application;

Passo 2: Clique em Módulo na guia Inserir, copie e cole o seguinte código VBA na janela Módulo;

Passo 3: Salve o arquivo VBA e feche a janela do módulo;

Etapa 4: clique em Executar Macro na guia Executar;

Etapa 5: selecione o arquivo VBA salvo e clique no botão Executar.

O código VBA de seleção de todas as tabelas:

Sub selecttables()
    Dim mytable As Table
    Application.ScreenUpdating = False

    For Each mytable In ActiveDocument.Tables
        mytable.Range.Editors.Add wdEditorEveryone
    Next
    ActiveDocument.SelectAllEditableRanges (wdEditorEveryone)
    ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone)
    Application.ScreenUpdating = True
End Sub