Word'de birden fazla dosya arasında nasıl arama ve değiştirme yapılır?
Eğer aynı içeriği (örneğin, başlıkları, altbilgileri veya belirli metinleri) içeren onlarca Word dosyanız varsa ve bu içeriği tüm belgelerde değiştirmeniz gerekiyorsa, bunu manuel olarak yapmak yorucu olabilir. Bu öğretici, birden fazla Word belgesinde aynı veya farklı içerikleri hızlı bir şekilde değiştirmek için iki yöntem sunar.
VBA kodu ile birden fazla Word belgesinde aynı anda metinleri bul ve değiştir
Kutools for Word ile birden fazla belgede farklı metinleri kolayca bul ve değiştir
VBA kodu ile birden fazla Word belgesinde aynı anda metinleri bul ve değiştir
Bu yöntem, birden fazla belgede içerik aramak ve değiştirmek için VBA kodunun nasıl kullanılacağını gösterir.
- Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.
- "Ekle" > "Modül" seçeneğine tıklayın, ardından aşağıdaki kodu yapıştırın:
Sub CommandButton1_Click() 'Updated by Extendoffice 20180625 Dim xFileDialog As FileDialog, GetStr(1 To 100) As String Dim xFindStr As String Dim xReplaceStr As String Dim xDoc As Document On Error Resume Next Set xFileDialog = Application.FileDialog(msoFileDialogFilePicker) With xFileDialog .Filters.Clear .Filters.Add "All WORD File ", "*.docx", 1 .AllowMultiSelect = True i = 1 If .Show = -1 Then For Each stiSelectedItem In .SelectedItems GetStr(i) = stiSelectedItem i = i + 1 Next i = i - 1 End If Application.ScreenUpdating = False xFindStr = InputBox("Find what:", "Kutools for Word", xFindStr) xReplaceStr = InputBox("Replace with:", "Kutools for Word", xReplaceStr) For j = 1 To i Step 1 Set xDoc = Documents.Open(FileName:=GetStr(j), Visible:=True) Windows(GetStr(j)).Activate Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = xFindStr .Replacement.Text = xReplaceStr .Forward = True .Wrap = wdFindAsk .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = True .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll ActiveDocument.Save ActiveWindow.Close Next Application.ScreenUpdating = True End With MsgBox "Operation end, please view", vbInformation End Sub
- Kodu çalıştırmak için F5 tuşuna basın.
- Gözat penceresinde işlemek istediğiniz belgeleri seçin ve "Tamam" butonuna tıklayın.
- "Ne bul" giriş kutusuna, bulmak istediğiniz kelimeyi veya ifadeyi girin ve "Tamam" butonuna tıklayın.
- "İle değiştir" giriş kutusuna, değiştirilecek metni girin ve "Tamam" butonuna tıklayın.
- Son Microsoft Word iletişim kutusunda "Tamam" butonuna tıklayın.
Seçilen Word dosyalarındaki belirtilen tüm metin örnekleri bir kerede değiştirilecektir.
Kutools for Word ile birden fazla belgede farklı metinleri kolayca bul ve değiştir
Kutools for Word'un "Toplu Bul ve Değiştir" özelliği, birden fazla Word belgesinde birden fazla metin öğesini aramanıza ve değiştirmenize olanak tanır.
- "Kutools" > "Toplu Değiştirme" seçeneğine tıklayın.
- Toplu Bul ve Değiştir iletişim kutusunda ayarları yapılandırın:
- "Satır Ekle" butonuna tıklayın.
- Yeni satırda:
- "Bul" altında bulmak istediğiniz metni girin.
- "Değiştir" altında değiştirilecek metni girin.
- Opsiyonel olarak, ilgili sütunlarda gerekli arama türünü, bulma ve değiştirme konumunu, vurgulama rengini ve diğer seçenekleri belirtin.
- Tıklayın
"Dosya Türü" bölümündeki butona tıklayarak toplu işleme Word dosyaları ekleyin.
- "Değiştir" veya "Bul" butonuna tıklayın. İpucu: Daha fazla bul ve değiştir kuralı eklemek için 1) ve 2) adımlarını tekrarlayın.
- İşlem bittiğinde Toplu Bul ve Değiştir iletişim kutusunu kapatın.
Notlar:
- "Bul" seçeneğine tıklarsanız, eşleşmeler "Önizleme Sonucu" sekmesinde görünecektir. Değişiklikleri daha sonra uygulamak için "Bul ve Değiştir" sekmesine geri dönün.
- "Değiştir" seçeneğine tıklarsanız, tüm eşleşmeler hemen değiştirilir ve "Önizleme Sonucu" altında gösterilir.
- Vurgulama renkleri belirtildiyse, Word belgelerinizdeki değişiklikler uygun şekilde renk kodlu olacaktır.
"Toplu Bul ve Değiştir" özelliği hakkında daha fazla bilgi için öğretici sayfasını görüntüleyin.
En İyi Ofis Verimlilik Araçları
Kutools for Word - Word Deneyiminizi 100’den Fazla Olağanüstü Özellik ile Zirveye Taşıyın!
🤖 Kutools AI Özellikleri: Yapay Zeka Asistanı / Gerçek Zamanlı Asistan / Süper Parlat (Biçimi Koru) / Süper Çeviri (Biçimi Koru) / AI Redaksiyon / Yapay Zeka Düzeltme...
📘 Belge Ustalığı: Sayfaları Böl / Belgeleri Birleştir / Seçimi Farklı Formatlarda Dışa Aktar (PDF/TXT/DOC/HTML...) / Toplu PDF’ye Dönüştür...
✏ İçerik Düzenleme: Birden Fazla Dosyada Toplu Bul ve Değiştir / Tüm Resimleri Yeniden Boyutlandır / Tablo Satır ve Sütunlarını Çevir / Tabloyu Metne Dönüştür...
🧹 Zahmetsiz Temizlik: Fazla Boşlukları / Bölüm Sonlarını / Metin Kutularını / Bağlantıları Kolayca Temizleyin. Daha fazla kaldırma aracı için Kaldır grubuna göz atın...
➕ Yaratıcı Ekleme: Binlik Ayraçları Ekle / Onay Kutuları Ekle / Radyo Düğmeleri Ekle / QR Kodu / Barkod / Birden Fazla Resim / Ekle grubunda daha fazlasını keşfedin...
🔍 Hassas Seçimler: Belirli Sayfaları / Tabloları / Şekilleri / Başlık Paragraflarını Hedefleyin; daha fazla Seç özelliğiyle gezinmeyi geliştirin...
⭐ Yıldız Geliştirmeler: Herhangi Bir Konuma Hızla Git / Tekrarlayan Metni Otomatik Ekle / Belge Pencereleri Arasında Geçiş Yap /11 Dönüştürme Aracı...

En İyi Ofis Verimlilik Araçları
Kutools for Word - Word için 100+ Araç
- 🤖 Kutools AI Özellikleri: Yapay Zeka Asistanı / Gerçek Zamanlı Asistan / Süper Parlat / Süper Çeviri / AI Redaksiyon / Yapay Zeka Düzeltme
- 📘 Belge Ustalığı: Sayfaları Böl / Belgeleri Birleştir / Toplu PDF’ye Dönüştür
- ✏ İçerik Düzenleme: Toplu Bul ve Değiştir / Tüm Resimleri Yeniden Boyutlandır
- 🧹 Zahmetsiz Temizlik: Fazla Boşlukları Kaldır / Bölüm Sonlarını Kaldır
- ➕ Yaratıcı Ekleme: Binlik Ayraçları Ekle / Onay Kutuları Ekle / QR Kodları Oluştur