3 maneiras de remover em lote a cor de preenchimento de várias formas em seu documento do Word

Neste post, temos o prazer de mostrar 3 métodos eficazes para remover em lote a cor de preenchimento de várias formas em seu documento do Word.

Ao inserir formas em um documento do Word, você também pode aplicar cores de preenchimento a elas. É fácil adicionar ou remover a cor de preenchimento de uma única forma. Mas quando se trata de processamento em lote, precisaremos de alguns truques.

Desta vez, queremos mostrar a você como remover em lote a cor de preenchimento de várias formas no documento. Assim, você pode preenchê-los com as cores desejadas ou apenas deixar as formas em branco no fundo. A seguir estão 3 métodos que podem ajudá-lo em diferentes casos.

Método 1: remover a cor de preenchimento de várias formas em uma página

1. Primeiro de tudo, clique na guia "Página inicial" na faixa de opções.
2. Em seguida, clique no comando “Selecionar” no grupo “Edição”.
3. No menu suspenso, escolha "Painel de seleção".
4. Agora, no painel “Seleção e visibilidade”, você pode ver todos os nomes das formas nesta página. Pressione “Ctrl” para selecionar as formas que você precisa.
5. Em seguida, clique em "Formatar" na faixa de opções.
6. Em seguida, clique em “Preenchimento da Forma”.
7. Escolha "Sem preenchimento" no menu suspenso.

Método 2: Remover em lote a cor de preenchimento de todas as formas em um documento

1. Primeiramente, se a guia "Desenvolvedor" estiver disponível, clique nela e, em seguida, clique em "Visual Basic" para abrir o editor VBA. Se a guia "Desenvolvedor" não estiver ativada, pressione "Alt + F11".
2. Agora no editor, clique no projeto “Normal” no lado esquerdo.
3. Em seguida, clique em “Inserir” na barra de menu.
4. Em seguida, escolha “Módulo” no menu suspenso.
5. Clique duas vezes no novo módulo para abri-lo e cole estes códigos lá:

Sub RemoveAllShapeFill()
  Dim objShape As Shape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    objShape.Fill.Visible = False
    objShape.Line.Visible = msoTrue
  Next objShape
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

6. Por fim, clique no botão “Executar” ou pressione “F5” para executar os códigos.

Método 3: remover a cor de preenchimento de todas as caixas de texto em um documento

As caixas de texto pertencem à categoria de forma. Caso você queira remover a cor de preenchimento de todas as caixas de texto, mas manter a cor de outras formas, você pode utilizar este método.

1. Em primeiro lugar, repita as etapas do método 2 para instalar e executar uma macro.
2. E desta vez, substitua essa macro por esta:

Sub RemoveTextBoxFill()
  Dim objShape As Shape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Fill.Visible = msoFalse
      objShape.Line.Visible = msoTrue
    Else
      Exit For
    End If
  Next objShape
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

Aqui está o resultado:

Recupere rapidamente documentos danificados

Se você se deparar com documentos corrompidos, não entre em pânico. Lembre-se de que a maioria dos documentos pode ser recuperada. O que você deve fazer é aproveitar o tempo e obter uma solução. correção de documento ferramenta. Hoje em dia, esse utilitário pode ser uma grande ajuda para recuperar seus dados.

Introdução do autor:

Vera Chen é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo correção de xls e pdf reparar produtos de software. Para mais informações visite www.datanumen.com