Bir Word belgesinde aynı anda birden fazla kelime nasıl bulunur ve değiştirilir?
Word, bir kelime veya kelime öbeğinin tüm örneklerini bulmak ve bunları aynı anda yeni bir kelimeyle değiştirmek için bir Bul ve Değiştir işlevi sağlar. Ancak aynı anda farklı kelimeleri bulmak ve değiştirmek istiyorsanız, bu yerleşik işlev yardımcı olamaz. Bu yazıda, Word belgesinde aynı anda birden çok farklı kelimeyi bulup değiştirmek için bir VBA yönteminden bahsediyoruz.
Word'de aynı anda birden çok kelimeyi VBA kodu ile bulun ve değiştirin
Harika bir özellikle Word'de aynı anda birden çok kelimeyi kolayca bulun ve değiştirin
Word'de aynı anda birden çok kelimeyi VBA kodu ile bulun ve değiştirin
Bir Word belgesinde aynı anda birden çok sözcüğü bulmak ve değiştirmek için lütfen aşağıdaki işlemleri yapın.
1. Bulmak ve birden çok kelimeyi aynı anda değiştirmek istediğiniz Word belgesini açın ve ardından Ara Toplam + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.
2. içinde Uygulamalar için Microsoft Visual Basic Pencere, tıklayın Ekle > Modülü. Ardından, VBA kodunu Modül penceresine kopyalayın.
VBA kodu: Word'de aynı anda birden çok kelimeyi bulun ve değiştirin
Sub FindAndReplaceMultiItems()
'Update by ExtendOffice 2018/10/25
Dim xFind As String
Dim xReplace As String
Dim xFindArr, xReplaceArr
Dim I As Long
Application.ScreenUpdating = False
xFind = InputBox("Enter items to be found here,seperated by comma: ", "Kutools for Word")
xReplace = InputBox("Enter new items here, seperated by comma: ", "Kutools for Word")
xFindArr = Split(xFind, ",")
xReplaceArr = Split(xReplace, ",")
If UBound(xFindArr) <> UBound(xReplaceArr) Then
MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
Exit Sub
End If
For I = 0 To UBound(xFindArr)
Selection.HomeKey Unit:=wdStory
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = xFindArr(I)
.Replacement.Text = xReplaceArr(I)
.Format = False
.MatchWholeWord = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Next
Application.ScreenUpdating = True
End Sub
3. Tuşuna basın. F5 kodu çalıştırmak için anahtar.
4. İlkinde Kutools for Word iletişim kutusunda bulup değiştireceğiniz birden çok kelimeyi metin kutusuna girin ve bunları virgülle ayırın, ardından OK buton. Ekran görüntüsüne bakın:
5. saniyede Kutools for Word iletişim kutusunda, değiştireceğiniz yeni kelimeleri girin (bu kelimelerin de virgülle ayrılması gerekir) ve ardından OK düğmesine basın.
Not: Bu durumda tümü "KTE" bu belgede şununla değiştirilecektir: "Yeni", ve "KTO" ve "KTW" ile değiştirilecek "Ölçek" ve "Bitiş". Lütfen ihtiyaçlarınıza göre değiştirin.
Harika bir özellikle Word'de aynı anda birden çok kelimeyi kolayca bulun ve değiştirin
The Toplu Bul ve Değiştir özelliği Kutools for Word bir belgedeki veya birden çok belge arasındaki farklı metinleri aynı anda kolayca bulup değiştirmenize yardımcı olabilir.
Bu özelliği uygulamadan önce lütfen birkaç dakikanızı ayırın önce indirin ve kurun.
1. Microsoft Word uygulamasını başlatın, tıklayın Kutools Artı > Toplu Bul ve Değiştir.
2. içinde Toplu Bul ve Değiştir penceresi, lütfen aşağıdaki gibi yapılandırın.
- 2.1 tıklayın düğmesi> Dosya Ekle or Klasör Ekle Birden çok kelimeyi bulup değiştireceğiniz bir veya daha fazla belge eklemek için.
- 2.2 Satır ekle Bul ve değiştir alanlarını eklemek için düğmesine basın. Üç farklı metni aynı anda bulmak ve değiştirmek istiyorsanız, lütfen üç satır oluşturun.
- 2.3 Her satırda, yerine yenisiyle değiştireceğiniz mevcut kelimeleri girin. bulmak sütununa girin ve ardından yeni kelimeleri değiştirmek sütun.
- 2.4 Belirtin Arama Tipi her sıra için.
- 2.5 içinde Bulmak sütununda bul ve değiştir'in nereye uygulanacağını seçin. O içerir Ana belge, üstbilgi ve Altbilgi bu bölümde. İhtiyaçlarınıza göre bunlardan birini, ikisini veya hepsini seçebilirsiniz.
- 2.6. Tıklayın değiştirmek İşlemi başlatmak için düğmesine basın. Ekran görüntüsüne bakın:
Daha sonra belirli sözcükler aynı anda seçilen belgelerde değiştirilir.
Bahşiş: Sonuçta belirli bir rengi belirterek arka plan rengiyle vurgulayabilirsiniz. Vurgulamak satır için sütun.
Bu yardımcı programın ücretsiz denemesine (60 günlük) sahip olmak istiyorsanız, indirmek için lütfen tıklayınızve ardından yukarıdaki adımlara göre işlemi uygulamaya gidin.
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ı...