Como aceitar alterações rastreadas de um usuário específico no Documento do Word?
Suponha que você tenha um Documento do Word revisado por várias pessoas, conforme mostrado na captura de tela a seguir. Agora, você precisa apenas aceitar as alterações rastreadas de uma pessoa específica. Como resolver essa tarefa no Documento do Word?
Aceitar alterações rastreadas de um usuário específico no Word
Aceitar alterações rastreadas de um usuário específico com código VBA
Aceitar alterações rastreadas de um usuário específico no Word
Para aceitar as alterações rastreadas de apenas um usuário, o recurso Mostrar Marcação no Word pode ajudá-lo, por favor, faça o seguinte:
1. Abra o Arquivo do Word que contém as alterações rastreadas e clique em Revisão > Mostrar Marcação > Pessoas Específicas, depois desmarque Todos os Revisores para ocultar todas as revisões, veja a captura de tela:
2. Em seguida, continue clicando em Mostrar Marcação > Pessoas Específicas e marque um revisor cujas alterações rastreadas você deseja aceitar, veja a captura de tela:
3. Depois disso, clique em Aceitar > Aceitar Todas as Alterações Exibidas, veja a captura de tela:
4. Agora, somente as alterações rastreadas dessa pessoa específica foram aceitas, veja a captura de tela:
5. Por fim, você deve exibir as alterações rastreadas dos outros revisores, por favor, clique em Mostrar Marcação > Pessoas Específicas, marque Todos os Revisores conforme mostrado na captura de tela a seguir:
Aceitar alterações rastreadas de um usuário específico com código VBA
Se o método acima for um pouco complicado para você, aqui está um código VBA simples que também pode ajudá-lo, por favor, siga os passos abaixo:
1. Pressione as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole a seguinte macro na Janela do Módulo.
Código VBA: Aceitar alterações rastreadas de um usuário:
Sub Acceptoneuser()
For Each xChange In ActiveDocument.Revisions
If xChange.Author = "RubyMie" Then
xChange.Accept
End If
Next
End Sub
Nota: No código acima, você deve alterar o nome do usuário "RubyMie" para o seu nome, conforme necessário.
3. Em seguida, pressione a tecla F5 para executar este código, e somente as alterações rastreadas do revisor especificado no código serão aceitas, veja a captura de tela:
Melhores Ferramentas de Produtividade para Office
Kutools para Word – Eleve sua experiência no Word com mais de 100 recursos incríveis!
🤖 Recursos de IA do Kutools: Assistente de IA / Assistente em Tempo Real / Super Polir (Preserva Formato) / Super Traduzir (Preserva Formato) / Redação por IA / Revisão por IA...
📘 Domínio de Documentos: Dividir Páginas / Mesclar Documentos / Exportar Seleção em Diversos Formatos (PDF/TXT/DOC/HTML...) / Converter em Lote para PDF...
✏ Edição de Conteúdo: Localizar e Substituir em Lote em Vários Arquivos / Redimensionar Todas as Imagens / Transpor Linhas e Colunas da Tabela / Converter Tabela para Texto...
🧹 Limpeza Sem Esforço: Elimine Espaços Extras / Quebras de Seção / Caixas de Texto / Hiperlinks / Para mais ferramentas de remoção, acesse o grupo Remover...
➕ Inserções Criativas: Inserir Separadores de Milhar / Caixas de Seleção / Botões de Rádio / QR Code / Código de Barras / Múltiplas Imagens / Descubra mais no grupo Inserir...
🔍 Seleções Precisas: Identifique Páginas Específicas / Tabelas / Formas / Parágrafos de Título / Melhore a navegação com mais recursos de Selecionar...
⭐ Melhorias Estrela: Navegue para Qualquer Localização / Insira Texto Repetitivo Automaticamente / Alterne Entre Janelas de Documentos /11 Ferramentas de Conversão...

Melhores Ferramentas de Produtividade para Office
Kutools para Word – 100+ Ferramentas para Word
- 🤖 Recursos de IA do Kutools: Assistente de IA / Assistente em Tempo Real / Super Polir / Super Traduzir / Redação por IA / Revisão por IA
- 📘 Domínio de Documentos: Dividir Páginas / Mesclar Documentos / Converter em Lote para PDF
- ✏ Edição de Conteúdo: Localizar e Substituir em Lote / Redimensionar Todas as Imagens
- 🧹 Limpeza Sem Esforço: Remover Espaços Extras / Remover Quebras de Seção
- ➕ Inserções Criativas: Inserir Separadores de Milhar / Inserir Caixas de Seleção / Criar QR Codes