O Microsoft Word permite que você aplique a formatação a grandes fragmentos de texto em massa. Você pode copiar a formatação aplicada a um pedaço de texto e aplicá-la a parágrafos e seções inteiros com apenas alguns cliques. Infelizmente, o mesmo não acontece com as tabelas. Se você quiser alterar o estilo de todas as tabelas em um documento específico, terá que selecionar cada uma individualmente e alterar o estilo. A alternativa é usar uma macro para fazer isso.
Encontrar estilo de mesa
Antes de criar a macro, você precisa encontrar o nome do estilo de tabela que deseja aplicar. Isso é muito fácil. Abra o documento do Word cujo estilo de tabela você deseja alterar. Clique dentro de uma tabela e vá para a guia Design na guia Ferramentas de tabela.
Passe o cursor do mouse sobre o estilo de tabela que deseja aplicar a todas as tabelas e uma dica de ferramenta dirá como é chamado. Anote o nome e você está pronto para criar a macro.
Macro de estilo de tabela
Habilite a guia Desenvolvedor no Word em Arquivo> Opções> Personalizar faixa de opções. Ative a barra de ferramentas do desenvolvedor e volte ao seu documento.
Na guia Desenvolvedor, clique em Macros. Dê a ele o seguinte nome;
ApplyTableStyle
Clique em criar e digite o seguinte na caixa de código, entretanto, você precisa editar esta linha: tbl.Style = “Medium Shading 2 – Accent 1”. Substitua o bit dentro das aspas pelo nome do estilo de tabela que você copiou na etapa anterior. Não remova as aspas do código. Basta inserir o nome do estilo de mesa e executá-lo.
Sub ApplyTableStyle() Dim tbl As Table For Each tbl In ActiveDocument.Tables tbl.Style = "Medium Shading 2 - Accent 1" Next End Sub
Isso é tudo que você precisa fazer. Assim que a macro for executada, ela mudará automaticamente o estilo de todas as tabelas. Se você precisar usar um estilo de tabela diferente, precisará remover essa macro porque ela altera proativamente o estilo de todas as tabelas para aquele que você especificou na macro.
Se você precisar alterar o estilo que a macro se aplica, você precisará editar o código e substituir o nome do estilo que deseja aplicar. A macro aplica estilos a todas as tabelas atuais e novas no documento. Obviamente, isso seria mais fácil se o Microsoft Word tivesse uma opção integrada para fazer isso. Parece uma deficiência estranha para o aplicativo.
Apoie o nosso trabalho ❤️
Se você gostou deste artigo, considere deixar uma gorjeta para nos ajudar a continuar publicando conteúdo de qualidade.





















