Note: The other languages of the website are Google-translated. Back to English

Hur accepterar jag endast formatändringar i Word-dokument?

Om du har ett Word-dokument som är i spårbytesläge, när du använder Acceptera alla ändringar funktionen kommer alla spårändringar att accepteras. Men ibland vill du bara acceptera ändringarna i formateringsspåret utan att acceptera infogningarna eller raderingarna. Denna artikel kommer att prata om hur man löser denna uppgift i Word-dokument.

Acceptera endast formatering av spårändringar i Word med VBA-kod

Acceptera endast formatering av spårändringar i Word med funktionen Visa markering


Acceptera endast formatering av spårändringar i Word med VBA-kod

Följande VBA-kod kan hjälpa dig att acceptera formateringsspårändringarna endast i Word-dokument, gör så här:

1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Och klicka sedan på Insert > Modulerna, kopiera och klistra in koden nedan i den öppnade tomma modulen:

VBA-kod: Acceptera endast formatändringar i Word-dokument

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. Och tryck sedan på F5 -knappen för att köra den här koden, och endast ändringar av formateringsspår har accepterats i det aktiva Word-dokumentet omedelbart. Se skärmdump:

doc accepterar formatering 1


Acceptera endast formatering av spårändringar i Word med funktionen Visa markering

I Word-dokument kan du också använda Visa markering för att avsluta det här jobbet, gör med följande steg:

1. Klicka på i filen för spårändringsläge översyn > Visa markering, och avmarkera sedan Kommentarer och Infogningar och raderingar och lämna formatering alternativ markerat, se skärmdump:

doc accepterar formatering 2

2. Och nu kan du bara se formaterade spårade ändringar, fortsätt sedan med att klicka översyn > Acceptera > Godkänn alla visade ändringar som följande skärmdump visas:

doc accepterar formatering 3

3. Och alla ändringar av formateringsspåren har accepterats, nu måste du återvända till Kommentar, Infogningar och raderingar alternativ genom att kontrollera dem från Visa markering rullgardinsmeny, se skärmdump:

doc accepterar formatering 4

4. Nu kan du se att formateringsspårändringarna har accepterats och andra spårändringar behålls fortfarande, se skärmdump:

doc accepterar formatering 1


Rekommenderade Word-produktivitetsverktyg

 

Kutools för Word - Mer än 100 avancerade funktioner för Word, spara 50% tid

  • Komplicerade och upprepade operationer kan göras engångsbehandling på några sekunder.
  • Infoga flera bilder över mappar i Word-dokumentet samtidigt.
  • Slå ihop och kombinera flera Word-filer över mappar till en med önskad ordning.
  • Dela upp det aktuella dokumentet i separata dokument enligt rubrik, avsnittbrytning eller andra kriterier.
  • Konvertera filer mellan Doc och Docx, Docx och PDF, samling verktyg för vanliga konverteringar och val, och så vidare ...
Sortera kommentarer efter
Kommentarer (3)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Vous êtes mon héros. En français, le code serait le suivant:

Sub AcceptFormatChanges()
Dim xRev As Revision
För varje xRev i ActiveDocument.Revisions
If Left(xRev.FormatDescription, 12) = "Mis en forme" Då
xRev.Acceptera
End If
Nästa
End Sub
Vintotal
Denna kommentar minimerades av moderatoren på webbplatsen
Dans toutes les langues:

Sub AcceptFormatChanges()
Dim xRev As Revision
För varje xRev i ActiveDocument.Revisions
Om xRev.FormatDescription <> "" Då
xRev.Acceptera
End If
Nästa
End Sub
Mathilde
Denna kommentar minimerades av moderatoren på webbplatsen
Merci, en effet, la dernière méthode fonctionne aussi en néerlandais
Gastoff
Det finns inga kommentarer här ännu
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0  Tecken
Föreslagna platser