Limpar sombreamento de tabela no Word

1

Eu tenho um documento com 137 tabelas, todas sombreadas com um estilo horrível em azul e 3D, o que faz com que elas ocupem muito espaço.

Como eu pelo menos me livrei do sombreamento em todos eles ao mesmo tempo ?

Seria bom saber como editá-los para livrar-se do estilo estranho e torná-los tabelas simples alinhadas que autofit conteúdos, mas eu sei que é pedir muito.

    
por Still.Tony 28.02.2014 / 16:08

2 respostas

4

Você pode executar esse VBA como uma macro para remover o sombreamento e alterar o estilo da tabela para bordas normais;

Sub RemoveShading()

    Dim tbl As Table
    For Each tbl In ActiveDocument.Tables
        tbl.Shading.Texture = wdTextureNone
        tbl.Shading.ForegroundPatternColor = wdColorAutomatic
        tbl.Shading.BackgroundPatternColor = wdColorAutomatic
        tbl.Style = "Table Grid"
    Next

End Sub

Observação: testei isso no Word 2010 com tabelas criadas a partir das barras de ferramentas padrão.

Editar por OP:

  • Para criar essa macro, vá para Arquivo, Opções, Personalizar Faixa de Opções
  • Marque a caixa "Desenvolvedor" em "Guias principais" em "Personalizar a faixa" à direita.
  • Clique em "OK"
  • Na faixa de opções Desenvolvedor, clique em Macros
  • Nomeie uma nova macro, edite-a, copie e cole o código na janela do VBA que aparece, salve e feche.
  • Clique na macro novamente na palavra e execute sua nova macro extravagante
por 28.02.2014 / 17:52
0

Para remover o sombreamento:

Clique com o botão direito em qualquer lugar da tabela e selecione Borders and Shading

Mude para a guia Shading

Defina o seguinte:

Fill to No Color Patterns - > Style to Clear Apply to to Table

Clique em OK

Para remover toda a formatação aplicada ao texto:

Clique com o botão direito em qualquer lugar da tabela e selecione Select - > Table

Pressione Ctrl + Espaço para limpar toda a formatação

    
por 28.02.2014 / 16:11