Ir para o conteúdo principal

Como aceitar alterações de trilha de formato apenas em documento do Word?

Se você tiver um documento do Word que está no modo de controle de alterações, ao aplicar o Aceitar todas as alterações recurso, todas as alterações de faixa serão aceitas. Mas, às vezes, você só quer aceitar as alterações da trilha de formatação sem aceitar as inserções ou exclusões. Este artigo irá falar sobre como resolver essa tarefa em um documento do Word.

Aceite apenas a formatação das alterações de faixa no Word com código VBA

Aceite apenas a formatação das alterações de faixa no Word com a função Mostrar marcação


Aceite apenas a formatação das alterações de faixa no Word com código VBA

O seguinte código VBA pode ajudá-lo a aceitar as alterações da faixa de formatação apenas em documentos do Word, faça o seguinte:

1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. E então, clique inserção > Módulo, copie e cole o código abaixo no módulo em branco aberto:

Código VBA: aceitar alterações de rastreamento de formato apenas em documento do Word

Sub AcceptFormatChanges()
    Dim xRev As Revision
    For Each xRev In ActiveDocument.Revisions
        If Left(xRev.FormatDescription, 10) = "Formatted:" Then
            xRev.Accept
        End If
    Next
End Sub

3. E, em seguida, pressione F5 para executar este código, e apenas as alterações da trilha de formatação foram aceitas no documento do Word ativo imediatamente. Veja a imagem:

doc aceitar formatação 1


Aceite apenas a formatação das alterações de faixa no Word com a função Mostrar marcação

No documento do Word, você também pode aplicar o Mostrar marcação função para terminar este trabalho, execute as seguintes etapas:

1. No arquivo de modo de mudanças de trilha, clique em Análise > Mostrar marcaçãoe, em seguida, desmarque o Comentários e Inserções e exclusões opções e deixe o formatação opção marcada, veja a captura de tela:

doc aceitar formatação 2

2. E agora, você só pode ver as alterações rastreadas de formatação, então, clique em Análise > ACEITAR > Aceitar todas as alterações mostradas como a seguinte captura de tela mostrada:

doc aceitar formatação 3

3. E todas as alterações da trilha de formatação foram aceitas, agora, você precisa voltar no Comentário, Inserções e exclusões opções verificando-as no Mostrar marcação lista suspensa, veja a captura de tela:

doc aceitar formatação 4

4. Agora, você pode ver que as alterações da faixa de formatação foram aceitas e outras alterações da faixa ainda são mantidas, consulte a captura de tela:

doc aceitar formatação 1

Melhores ferramentas de produtividade de escritório

Kutools for Word - Eleve sua experiência com palavras com mais 100 Recursos notáveis!

🤖 Assistente de IA do Kutools: Transforme sua escrita com IA - Gerar conteúdo  /  Reescrever texto  /  Resumir documentos  /  Pergunte para obter informações com base no documento, tudo dentro do Word

📘 Domínio de documentos: Páginas divididas  /  Mesclar Documentos  /  Seleção de exportação em vários formatos (PDF/TXT/DOC/HTML...)  /  Conversão em lote para PDF  /  Exportar páginas como imagens  /  Imprima vários arquivos de uma vez...

Edição de conteúdo: Localização e substituição em lote em vários arquivos  /  Redimensionar todas as imagens  /  Transpor linhas e colunas da tabela  /  Converter tabela em texto...

🧹 Limpeza sem esforço: Varrer Espaços extras  /  Quebras de seção  /  Todos os cabeçalhos  /  Caixas de Texto  /  hiperlinks  / Para mais ferramentas de remoção, acesse nosso Remover Grupo...

Inserções criativas: Inserir Mil Separadores  /  Caixas de seleção  /  botões de rádio  /  QR Code  /  Código de barras  /  Tabela de linhas diagonais  /  Legenda da equação  /  Legenda da Imagem  /  Legenda da Tabela  /  Várias fotos  / Descubra mais no Inserir Grupo...

🔍 Seleções de precisão: Identificar páginas específicas  /  tabelas  /  formas  /  parágrafos de título  / Melhore a navegação com mais Selecione recursos...

Aprimoramentos de estrelas: Navegue rapidamente para qualquer local  /  inserir automaticamente texto repetitivo  /  alternar perfeitamente entre janelas de documentos  /  11 ferramentas de conversão...

👉 Quer experimentar esses recursos? Kutools para Word oferece um 60-day free trial, sem limitações! 🚀
 
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Vous êtes mon héros. En français, le code serait le suivant:

Sub AcceptFormatChanges()
Dim xRev As Revision
For Each xRev In ActiveDocument.Revisions
If Left(xRev.FormatDescription, 12) = "Mis en forme" Then
xRev.Accept
End If
Next
End Sub
This comment was minimized by the moderator on the site
Dans toutes les langues :

Sub AcceptFormatChanges()
Dim xRev As Revision
For Each xRev In ActiveDocument.Revisions
If xRev.FormatDescription <> "" Then
xRev.Accept
End If
Next
End Sub
This comment was minimized by the moderator on the site
Merci, en effet, la dernière méthode fonctionne aussi en néerlandais
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations