Do Básico ao Avançado
Home  Tutoriais  Artigos  Contato

Selecionar todas as tabelas do documento

Neste tutorial criaremos um código VBA com o objetivo de Selecionar Todas as Tabelas do Documento.

Observe que na imagem abaixo temos um documento com três tabelas e digamos que necessitamos selecionar todas ao mesmo tempo, seja para aplicar uma mesma formatação em todas elas, seja para excluí-las todas de uma vez ou copiá-las para um novo local.

Selecionar tabelas

Para executar esta tarefa criaremos uma macro com a ajuda do Editor do Visual Basic.

No ambiente de programação criaremos um código VBA que selecionará todas as tabelas no documento.

Na Guia Desenvolvedor, no Grupo Código clique em Visual Basic ou pressione “ALT + F11” para abrir o Editor do Visual Basic.

Editor do Visual Basic

No menu Inserir clique em Módulo.

Inserir Módulo

Na Janela de Código adicione o seguinte código:

Sub selecionatabelas()
Dim mTab As Table
Application.ScreenUpdating = False
For Each mTab In ActiveDocument.Tables
mTab.Range.Editors.Add wdEditorEveryone
Next
ActiveDocument.SelectAllEditableRanges (wdEditorEveryone)
ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone)
Application.ScreenUpdating = True
End Sub

Deverá ficar como na imagem abaixo:

Selecionar todas as tabelas do documento

Feche o Editor do Visual Basic clicando no menu Arquivo e em Fechar e voltar para Microsoft Word.

Fechar e Voltar para o Word

Clique na Guia Desenvolvedor e no Grupo Código clique em Macros.

Macro

Selecione a macro “selecionatabelas” e clique no botão Executar.

Executar Macro

Observe que quando a macro é executada todas as tabelas do documento são selecionadas.

todas as tabelas selecionadas

Faça download do arquivo usado como exemplo neste tutorial: Baixar Arquivo




Conteúdo Correspondente:


eBook Word 2010 VBA

Política de Privacidade  |   © 2013 Tutoriais Word - Todos os direitos reservados