Bu yazıda, yalnızca Word belgenizde belirli izlenen değişiklikleri kabul etmenin 3 yolunu sizinle paylaşmak istiyoruz.
Normalde, değişiklikleri izlenen bir belgede, hepsini bir kerede veya tek tek kabul edebilirsiniz. Ancak bazen, tüm biçimlendirme değişiklikleri gibi yalnızca belirli değişiklikleri kabul etmeniz gerekebilir. Bunu ele almak için ek adımlar gerekir.
Aşağıda, yalnızca farklı durumlarda belirli izlenen değişiklikleri kabul etmek için 3 yaklaşım bulunmaktadır.
Yöntem 1: Belirli Türdeki Tüm İzlenen Değişiklikleri Kabul Et
Burada belgedeki tüm biçimlendirme değişikliklerini kabul etmemiz gerektiğini varsayalım.
- İlk olarak “Gözden Geçir” sekmesine tıklayın.
- Ardından “İşaretlemeyi Göster” komutunu tıklayın.
- Ardından, açılır menüde yalnızca "Biçimlendirme" kutusunu işaretleyin.
- Artık belgede yalnızca biçimlendirme değişikliklerinin gösterildiğini görebilirsiniz. “Kabul Et” komutundaki açılır düğmeyi tıklayın.
- Ve “Gösterilen Tüm Değişiklikleri Kabul Et” seçeneğini seçin.
Aynı şekilde, diğer değişiklikleri kabul etmek için belgede yalnızca bu tür değişiklikleri göstermeniz ve kabul etmeniz yeterlidir.
Yöntem 2: Yalnızca Silme veya Ekleme İşlemlerini Kabul Edin
İlk ekran görüntüsünden de görebileceğiniz gibi, eklemeler ve silmeler birbirine bağlıdır. Bu nedenle, bunlardan birini kabul etmek için bir makroya ihtiyacınız var.
- Her şeyden önce, Word'de VBA düzenleyicisini tetiklemek için “Alt + F11” tuşlarına basın.
- Ardından "Normal" projeye tıklayın ve menü çubuğunda "Ekle"ye tıklayın.
- Ve yeni bir tane eklemek için o menüden “Modül” öğesini seçin.
- Ardından modülü açmak için çift tıklayın ve aşağıdaki kodları yapıştırın:
Sub AcceptOnlyDeletionsInDoc()
Dim objRevision As Revision
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
For Each objRevision In objDoc.Revisions
With objRevision
If .Type = wdRevisionDelete Then
.Accept
End If
End With
Next objRevision
Application.ScreenUpdating = True
Set objDoc = Nothing
End Sub
- Son olarak, kodları çalıştırmak için “Çalıştır” düğmesine tıklayın veya sadece “F5” tuşuna basın.
Bu makro, belgedeki tüm silmeleri kabul eder. Tüm eklemeleri kabul etmek için, basitçe bu makroyu değiştirin:
Sub AcceptOnlyInsertionsInDoc()
Dim objRevision As Revision
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
For Each objRevision In objDoc.Revisions
With objRevision
If .Type = wdRevisionInsert Then
.Accept
End If
End With
Next objRevision
Application.ScreenUpdating = True
Set objDoc = Nothing
End Sub
Yöntem 3: Seçimdeki Tüm Değişiklikleri Kabul Et
Bu yöntem, bir seçimdeki farklı türlerdeki tüm değişiklikleri nasıl hızlı bir şekilde kabul edeceğinizi gösterir.
- İçintart ile, üzerinde bir seçim yap tarmenzil al.
- Ardından, Şeritte "Gözden Geçir" sekmesine tıklayın.
- Daha sonra "Kabul Et" komutundaki açılır düğmeyi tıklayın.
- Açılır menüde "Değişikliği Kabul Et"i seçin. Ve bu kadar.
Her Yere Sızan Veri Kaybı
Dijitalleşme dalgasıyla birlikte, elde etme olasılığı bozuk belge artıyor. Verilerinizin değeri göz önüne alındığında, yeterli bir onarım aracı edinmeniz önemle tavsiye edilir. Böylece belgeleri en kısa sürede kurtarabilirsiniz.
Yazar Tanıtımı:
Vera Chen bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. xls'i düzelt ve pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com




