¿Cómo aceptar los cambios de seguimiento de un usuario específico en un documento de Word?
Supongamos que tiene un documento de Word revisado por varias personas como se muestra en la siguiente captura de pantalla. Ahora, solo necesita aceptar los cambios de seguimiento de una persona específica. ¿Cómo podría resolver esta tarea en un documento de Word?
Aceptar cambios de seguimiento de un usuario específico en Word
Acepte los cambios de seguimiento de un usuario específico con código VBA
Aceptar cambios de seguimiento de un usuario específico en Word
Para aceptar los cambios de seguimiento de un solo usuario, el Mostrar marcado característica en Word puede ayudarlo, haga lo siguiente:
1. Abra el archivo de Word que contiene los cambios de seguimiento y luego haga clic en Revisar > Mostrar marcado > Personas específicasy luego desmarque Todos los revisores para ocultar todas las reseñas, vea la captura de pantalla:
2. Luego, sigue haciendo clic Mostrar marcado > Personas específicas, y luego verifique un revisor cuyo seguimiento de cambios desea aceptar, vea la captura de pantalla:
3. Y luego, haga clic en Aceptar > Aceptar todos los cambios mostrados, ver captura de pantalla:
4. Ahora, solo se han aceptado los cambios de seguimiento de esta persona específica, vea la captura de pantalla:
5. Por último, debería mostrar los cambios de seguimiento de otros revisores, haga clic en Mostrar marcado > Personas específicasverificar Todos los revisores como se muestra en la siguiente captura de pantalla:
Acepte los cambios de seguimiento de un usuario específico con código VBA
Si el método anterior es problemático para usted, aquí hay un código VBA simple que también puede hacerle un favor, siga los siguientes pasos:
1. Mantenga pulsado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic recuadro > Móduloy pegue la siguiente macro en la ventana del módulo.
Código VBA: Acepte los cambios de seguimiento de un usuario:
Sub Acceptoneuser()
For Each xChange In ActiveDocument.Revisions
If xChange.Author = "RubyMie" Then
xChange.Accept
End If
Next
End Sub
Note： En el código anterior, debe cambiar el nombre de usuario “rubymie”A su nombre como lo necesite.
3. Entonces presione F5 clave para ejecutar este código, y solo se han aceptado los cambios de seguimiento del revisor que especificó en el código, vea la captura de pantalla:
Las mejores herramientas de productividad de oficina
Kutools for Word - Mejore su experiencia con Word con Over 100 ¡Características notables!
🤖 Asistente de IA de Kutools: Transforma tu escritura con IA - Generar contenido / Reescribir texto / Resumir documentos / Solicite información basado en el documento, todo dentro de Word
📘 Dominio del documento: Dividir páginas / Combinar documentos / Exportar selección en varios formatos (PDF/TXT/DOC/HTML...) / Convertir por lotes a PDF / Exportar páginas como imágenes / Imprima varios archivos a la vez...
✏ Edición de contenidos: Buscar y reemplazar por lotes en varios archivos / Cambiar el tamaño de todas las imágenes / Transponer filas y columnas de tabla / Convertir tabla en texto...
🧹 Limpieza sin esfuerzo: barrer Espacios extra / Saltos de sección / Todos los encabezados / Cuadros de texto / Los hipervínculos / Para obtener más herramientas de extracción, diríjase a nuestro Quitar grupo...
➕ Inserciones creativas: Insertar Mil Separadores / Casillas de verificación / Botones de radio / Código QR / Barcode / Tabla de líneas diagonales / Título de la ecuación / Captura de imagen / Pie de tabla / Varias imágenes / Descubre más en el Insertar grupo...
🔍 Selecciones de precisión: Localizar páginas específicas / tablas / formas / párrafos de encabezado / Mejorar la navegación con más, Seleccionar características...
⭐ Mejoras de estrellas: Navegue rápidamente a cualquier ubicación / insertar automáticamente texto repetitivo / alternar sin problemas entre ventanas de documentos / 11 herramientas de conversión...
