Ana içeriğe atla

Biçim izleme değişikliklerini yalnızca Word belgesinde nasıl kabul edebilirim?

Değişiklikleri izle modunda olan bir Word belgeniz varsa, Tüm Değişiklikleri Kabul Et özelliği, tüm parça değişiklikleri kabul edilecektir. Ancak bazen, eklemeleri veya silmeleri kabul etmeden biçimlendirme parça değişikliklerini kabul etmek istersiniz. Bu makale, bu görevin Word belgesinde nasıl çözüleceğinden bahsedecek.

VBA kodu ile Word'de yalnızca biçimlendirme parça değişikliklerini kabul edin

İşaretlemeyi Göster işleviyle Word'de yalnızca biçimlendirme parça değişikliklerini kabul edin


VBA kodu ile Word'de yalnızca biçimlendirme parça değişikliklerini kabul edin

Aşağıdaki VBA kodu, yalnızca Word belgesindeki biçimlendirme parça değişikliklerini kabul etmenize yardımcı olabilir, lütfen şu şekilde yapın:

1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. Ve sonra tıklayın Ekle > modül, aşağıdaki kodu kopyalayıp açılan boş modüle yapıştırın:

VBA kodu: Biçim izleme değişikliklerini yalnızca Word belgesinde kabul edin

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. Ve sonra tuşuna basın. F5 Bu kodu çalıştırmak için anahtar ve aktif Word belgesinde hemen sadece biçimlendirme parça değişiklikleri kabul edildi. Ekran görüntüsüne bakın:

doc biçimlendirmeyi kabul et 1


İşaretlemeyi Göster işleviyle Word'de yalnızca biçimlendirme parça değişikliklerini kabul edin

Word belgesinde, ayrıca İşaretlemeyi Göster Bu işi bitirmek için lütfen aşağıdaki adımları uygulayın:

1. Değişiklikleri izleme modu dosyasında, Değerlendirme > İşaretlemeyi Gösterve ardından işaretini kaldırın Yorumlar ve Eklemeler ve Silmeler seçenekleri ve bırakın biçimlendirme seçenek işaretlendi, ekran görüntüsüne bakın:

doc biçimlendirmeyi kabul et 2

2. Ve şimdi, sadece biçimlendirmede izlenen değişiklikleri görebilir ve ardından, Değerlendirme > Kabul et > Gösterilen Tüm Değişiklikleri Kabul Et aşağıdaki ekran görüntüsü gibi:

doc biçimlendirmeyi kabul et 3

3. Ve tüm biçimlendirme parça değişiklikleri kabul edildi, şimdi geri dönmeniz gerekiyor. Yorum Yap, Eklemeler ve Silmeler seçenekleri kontrol ederek İşaretlemeyi Göster açılır liste, ekran görüntüsüne bakın:

doc biçimlendirmeyi kabul et 4

4. Şimdi, biçimlendirme parça değişikliklerinin kabul edildiğini ve diğer parça değişikliklerinin hala saklandığını görebilirsiniz, ekran görüntüsüne bakın:

doc biçimlendirmeyi kabul et 1

En İyi Ofis Üretkenlik Araçları

Kutools for Word - Over ile Kelime Deneyiminizi Yükseltin 100 Dikkat Çekici Özellikler!

🤖 Kutools Yapay Zeka Asistanı: Yazılarınızı AI ile dönüştürün - İçerik Oluştur  /  Metni Yeniden Yaz  /  Belgeleri Özetleyin  /  Bilgi İçin Arayın Belgeye dayalı, hepsi Word'de

📘 Belge Ustalığı: Sayfaları Böl  /  Belgeleri Birleştir  /  Seçimi Çeşitli Formatlarda Dışa Aktar (PDF/TXT/DOC/HTML...)  /  PDF'ye Toplu Dönüştürme  /  Sayfaları Görüntü Olarak Dışa Aktar  /  Aynı Anda Birden Çok Dosyayı Yazdırma...

İçerik Düzenleme: Toplu Bul ve Değiştir Birden Çok Dosyada  /  Tüm Resimleri Yeniden Boyutlandır  /  Tablo Satırlarını ve Sütunlarını Yer Değiştirme  /  Tabloyu Metne Dönüştür...

🧹 Zahmetsiz Temizlik: Uzaklaşın Ekstra Alanlar  /  Bölüm Sonları  /  Tüm Başlıklar  /  Metin kutuları  /  Köprüler  / Daha fazla sökme aleti için sayfamıza gidin Grubu Kaldır...

Yaratıcı Ekler: Ekle Bin Ayırıcı  /  Onay Kutuları  /  Radyo Düğmeleri  /  QR Code  /  Barkod  /  Çapraz Çizgi Tablosu  /  Denklem Başlığı  /  Görüntü Başlık  /  Tablo başlığı  /  Çoklu Resimler  / Daha fazlasını şurada keşfedin: Grup Ekle...

🔍 Hassas Seçimler: Nokta tespiti belirli sayfalar  /  tablolar  /  şekiller  /  başlık paragrafları  / Gezinmeyi şununla geliştirin: Daha Özellikleri seçin...

Yıldız Geliştirmeleri: Herhangi bir konuma hızla gidin  /  tekrarlanan metni otomatik olarak ekle  /  belge pencereleri arasında sorunsuzca geçiş yapın  /  11 Dönüşüm Aracı...

👉 Bu özellikleri denemek ister misiniz? Kutools for Word şunları sunar: 60 günlük ücretsiz deneme, hiçbir sınırlama olmaksızın! ????
 
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