Como remover guias usadas para recuar parágrafos em um documento do Word

Às vezes, você deseja remover as guias que recuam seus parágrafos. Mas em um documento longo, isso pode ser um pesadelo. Aqui estão duas soluções rápidas.

Muitos usuários do Microsoft Word inserem uma guia no início de cada parágrafo. Em um documento único, geralmente não importa, mas em um documento que é atualizado com frequência, essas guias podem causar problemas. Mesmo que não, você pode preferir o estilo de bloco, que não usa recuo no início de cada parágrafo. Independentemente de como as guias chegaram lá, talvez você queira removê-las. Neste artigo, mostrarei duas maneiras de remover uma guia no início de cada parágrafo: Substituir e um procedimento VBA.

VEJA: 83 dicas do Excel que todo usuário deve dominar (TechRepublic)

Estou usando o Microsoft 365 em um sistema Windows 10 de 64 bits. (Recomendo que você não atualize para o Windows 11 até que todos os problemas sejam resolvidos, a menos que você tenha um motivo específico para fazê-lo.) Para sua conveniência, você pode baixar os arquivos de demonstração .docm, .doc e .cls. O Word Online não oferece e a macros ou códigos de substituição especiais.

Como remover guias usando Substituir no Microsoft Word

Em um documento longo, ninguém tem tempo para excluir manualmente uma guia usada para recuar cada parágrafo do documento. Além de ser tedioso, não é um bom uso do seu tempo. Felizmente, você pode usar o recurso Substituir do Word se souber os códigos especiais a serem usados:

• ^p representa a marca de parágrafo
• ^t representa uma guia

Nesse caso, pesquisar cada guia usando ^t sozinho não funcionará porque isso encontraria todas as guias em vez de apenas as guias após uma marca de parágrafo. Vamos trabalhar com um exemplo rápido usando o documento mostrado em Figura A:

1. Na guia Início, clique no menu suspenso Edição no grupo Edição e escolha Substituir.
2. No controle Localizar, insira .
3. No controle Substituir por, insira (Figura A).
4. Clique em Substituir tudo.
5. Quando solicitado, confirme a tarefa (duas vezes, se necessário).

Figura A

Como você pode ver, habilitei Mostrar/Ocultar (na guia Início do grupo Parágrafo) para que você possa ver as marcas de guia e parágrafo.

Figura B mostra o documento resultante; apenas uma guia não foi removida. Em linguagem simples, esta tarefa diz: Ao encontrar uma marca de parágrafo seguida por uma tabulação, substitua ambos os caracteres por apenas uma marca de parágrafo. A tabulação deve ser precedida por uma marca de parágrafo. A primeira guia do documento não atende a esse requisito. A remoção manual dessa guia não parece tão ruim quando você percebe que não está excluindo dezenas ou até centenas de guias manualmente.

Figura B

Se isso não funcionar para você, clique no botão Mais e substitua os códigos inseridos manualmente usando o botão Especial. Às vezes, o Word é um pouco complicado e não avalia os códigos inseridos pelo teclado. A única limitação real é lembrar como usar corretamente os códigos. Se estiver dando e a usuários que podem não ter essa habilidade, você pode fornecer um subprocedimento VBA.

Como remover guias usando VBA em um documento do Word

Se exigir que os usuários se lembrem de como usar o Replace dessa maneira for pedir demais, forneça a eles uma solução VBA. Tudo o que eles precisam se lembrar de fazer é executar o procedimento, e você pode adicioná-lo a um grupo na faixa de opções ou na Barra de Ferramentas de o Rápido (QAT), tornando o o rápido e fácil. Listagem A é o subprocedimento que usaremos.

Listagem A
Sub RemoverTabs()

‘Remove todas as guias após uma marca de parágrafo.

‘Remove tabulações usadas para recuar parágrafos.

Seleção.Localizar.LimparFormatação

Seleção.Localizar.Substituição.LimparFormatação

Com Seleção. Localizar

.Texto = “^p^t”

.Replacement.Text = “^p”

.Avançar = Verdadeiro

.Wrap = wdFindContinue

.Formato = Falso

.MatchCase = False

.MatchWholeWord = False

.MatchWildcards = False

.MatchSoundsLike = False

.MatchAllWordForms = False

Terminar com

Selection.Find.Execute Replace:=wdReplaceAll
Finalizar Sub

Para entrar no procedimento, pressione Alt + F11 para abrir o Editor do Visual Basic (VBE). No Project Explorer à esquerda, selecione ThisDocument, conforme mostrado em Figura C. Você pode inserir o código manualmente ou importar o arquivo .cls para . Além disso, a macro está nos arquivos .docm, .doc e .cls para . Se você inserir o código manualmente, não cole desta página da web. Em vez disso, copie o código em um editor de texto e cole esse código no módulo ThisDocument. Isso removerá quaisquer caracteres da Web fantasmas que possam causar erros.

Figura C

Após entrar no procedimento, retorne ao documento. Se você estiver usando uma versão da faixa de opções, salve a pasta de trabalho como um arquivo habilitado para macro. Se estiver trabalhando na versão de menu, pule esta etapa.

Se você estiver usando o arquivo de demonstração, você pode querer pressionar Ctrl + Z para desfazer as exclusões de guias da última seção para que você possa ver o procedimento removê-las. Para executar o procedimento, clique na guia Desenvolvedor. No grupo Código, clique em Macros. Na caixa de diálogo resultante, selecione RemoveTabs (Figura D) e clique em Executar. Agora, você não vai querer pedir aos usuários que trabalhem tanto para executar este procedimento. Para saber como adicionar o procedimento a um grupo personalizado na faixa de opções ou QAT, leia Como adicionar macros do Office à barra de ferramentas QAT para o rápido.

Figura D

Se você usar o procedimento Substituir ou VBA, lembre-se de que nenhum deles encontrará essa primeira guia no documento. No entanto, ele deve encontrar todas as outras instâncias de uma guia após uma marca de parágrafo. Se não tiver certeza, você pode clicar em Substituir e Avançar por algumas instâncias até se sentir mais confortável substituindo todos ao mesmo tempo.