Wie akzeptiere ich Änderungen von einem bestimmten Benutzer in einem Word-Dokument?
Angenommen, Sie haben ein Word-Dokument, das von mehreren Personen wie im folgenden Screenshot überprüft wurde. Jetzt müssen Sie nur noch die Spuränderungen einer bestimmten Person akzeptieren. Wie könnte diese Aufgabe im Word-Dokument gelöst werden?
Akzeptieren Sie Änderungen von einem bestimmten Benutzer in Word
Akzeptieren Sie Änderungen von einem bestimmten Benutzer mit VBA-Code
Akzeptieren Sie Änderungen von einem bestimmten Benutzer in Word
Um die Spuränderungen von nur einem Benutzer zu akzeptieren, muss der Markup anzeigen Die Funktion in Word kann Ihnen dabei helfen. Gehen Sie wie folgt vor:
1. Öffnen Sie die Word-Datei mit den Spuränderungen und klicken Sie dann auf Bewertung > Markup anzeigen > Spezifischund dann deaktivieren Alle Rezensenten Um alle Bewertungen auszublenden, siehe Screenshot:
2. Klicken Sie dann weiter Markup anzeigen > Spezifischund überprüfen Sie dann einen Prüfer, dessen Titeländerungen Sie akzeptieren möchten, siehe Screenshot:
3. Und dann klicken Akzeptieren > Akzeptieren Sie alle angezeigten Änderungen, siehe Screenshot:
4. Jetzt wurden nur die Titeländerungen von dieser bestimmten Person akzeptiert, siehe Screenshot:
5. Zuletzt sollten Sie die Trackänderungen anderer Reviewer anzeigen, klicken Sie bitte auf Markup anzeigen > Spezifisch, prüfen Alle Rezensenten wie folgt Screenshot gezeigt:
Akzeptieren Sie Änderungen von einem bestimmten Benutzer mit VBA-Code
Wenn die oben beschriebene Methode für Sie problematisch ist, finden Sie hier einen einfachen VBA-Code, der Ihnen auch einen Gefallen tun kann. Führen Sie die folgenden Schritte aus:
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie das folgende Makro in das Modulfenster ein.
VBA-Code: Akzeptieren Sie Änderungen von einem Benutzer:
Sub Acceptoneuser()
For Each xChange In ActiveDocument.Revisions
If xChange.Author = "RubyMie" Then
xChange.Accept
End If
Next
End Sub
Note: Im obigen Code sollten Sie den Benutzernamen ändern. “RubyMieZu Ihrem Namen, wie Sie brauchen.
3. Dann drücken F5 Schlüssel zum Ausführen dieses Codes, und nur die Spuränderungen von dem im Code angegebenen Prüfer wurden akzeptiert, siehe Screenshot:
Beste Office-Produktivitätstools
Kutools for Word - Steigern Sie Ihr Word-Erlebnis mit Over 100 Bemerkenswerte Funktionen!
🤖 Kutools KI-Assistent: Verwandeln Sie Ihr Schreiben mit KI – Inhalte generieren / Text umschreiben / Dokumente zusammenfassen / Erkundigen Sie sich nach Informationen basierend auf Dokument, alles in Word
📘 Dokumentenbeherrschung: Seiten teilen / Dokumente zusammenführen / Auswahl in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML...) / Stapelkonvertierung in PDF / Seiten als Bilder exportieren / Drucken Sie mehrere Dateien gleichzeitig...
✏ Inhaltsbearbeitung: Batch suchen und ersetzen über mehrere Dateien hinweg / Größe aller Bilder ändern / Vertauschen Sie Tabellenzeilen und -spalten / Tabelle in Text konvertieren...
🧹 Mühelose Reinigung: Wegfegen Zusätzliche Räume / Abschnittswechsel / Alle Header / Textfelder / Hyperlinks / Weitere Entfernungswerkzeuge finden Sie auf unserer Gruppe entfernen...
➕ Kreative Einsätze: Einfügen Tausend Trennzeichen / Kontrollkästchen / Radio Knöpfe / QR Code / Strichcode / Diagonale Linientabelle / Gleichungsbeschriftung / Bildunterschrift / Tabellenüberschrift / Mehrere Bilder / Entdecken Sie mehr im Gruppe einfügen...
🔍 Präzise Auswahl: Punktgenau bestimmte Seiten / Tabellen / Formen / Überschriften von Absätzen / Verbessern Sie die Navigation mit mehr Wählen Sie Funktionen aus...
⭐ Star-Verbesserungen: Navigieren Sie schnell zu jedem Ort / Sich wiederholenden Text automatisch einfügen / Wechseln Sie nahtlos zwischen Dokumentfenstern / 11 Konvertierungstools...