Aşağıdaki yazımızda size Word belgenizde bulanık arama yapmak için 2 kullanışlı yöntem sunmak istiyoruz.
Zaman zaman, özellikle uzun kelimelerde, bir kelimeyi doğru yazmayı unutmamız olasıdır. Çoğu zaman, sadece birkaç başlangıç harfini hatırlarız. Bu da doğru aramayı neredeyse imkansız hale getirir.
Şanslıyız ki bulanık aramanın yolları var. Ve bunları Word belgenizde kullanabilirsiniz.
Yöntem 1: Word'de "Gelişmiş Bul" Özelliğini Kullanın
Bizim durumumuzda, “DataNumen”, sadece “Data” ile başladığını hatırladığımızı varsayarsak.
- İlk olarak “Ana Sayfa” sekmesi altındaki “Düzenleme” grubunda “Bul” komutunun yanındaki açılır butona tıklayın.
- Ve bu menüde “Gelişmiş Bul” seçeneğini seçin.
- Ardından, ekleme işaretçisini "Neyi bul" metin kutusuna koyun ve aşağıdaki joker karakterleri buraya yapıştırın:
- "Data", hedef kelimenin ilk harfleridir. Bunları gerçek harflerle değiştirmeniz gerekiyor. İlk harfleri unutmanız durumunda, boş bırakın ve boşluk bile koymayın.
- Ve “n,m”, hedef kelimenin başındaki harfler hariç, kalan harf uzunluğunun sayısını temsil eder. Örneğin, bu durumda bu sayı “5”tir. Dolayısıyla joker karakterler şu şekilde görünmelidir:
- Harf uzunluğunun doğru sayısından emin değilseniz, aralığı belirten 2 rakam girebilirsiniz, örneğin:
- Ve harf uzunluğunun belirli bir sayıya eşit veya daha büyük olduğundan eminseniz, bunu şu şekilde ifadeye girin:
- Ardından, daha fazla seçenek ortaya çıkarmak için "Diğer" i tıklayın.
- "Joker karakter kullan" kutusunu işaretleyin.
- Ardından "Bul"a tıklayın ve "Ana Belge"yi seçin.
Seçiminizde hedef kelimenin tüm geçişlerini göreceksiniz.
Yöntem 2: Metin Aramak için VBA Kodlarını Çalıştırın
VBA kodlarını çalıştırmak sizi ifadeyi ezberlemekten kurtarabilir.
- Öncelikle, Word'de VBA düzenleyicisini açmak için "Alt + F11" tuşlarına basın.
- Ardından “Normal” projeye tıklayın ve ardından “Ekle”ye tıklayın.
- Menüden "Modül"ü seçin.
- Aşağıdaki kodları açmak ve oraya yapıştırmak için üzerine çift tıklayın:
Sub FindTheWordsByLength()
Dim objRange As Range
Dim strStartWord As String
Dim strLength As String
strStartWord = InputBox("Enter the beginning letters which you remember of target word ", "Beginning Letters of Word", "For example:Data")
strLength = InputBox("Enter the letter length of the rest part of target word which you don't remember", "Number of Letter Length", "For example:5,7")
With Selection
.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
With Selection.Find
.Text = "<" & strStartWord & "[a-zA-Z]{" & strLength & "}>"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
.Execute
End With
Do While .Find.Found
Set objRange = Selection.Range
objRange.HighlightColorIndex = wdYellow
.Collapse wdCollapseEnd
.Find.Execute
Loop
End With
End Sub
- Ardından makroyu çalıştırmak için “F5” e basın.
- Açılan ilk giriş kutusuna hedef kelimenin ilk harflerini girin ve devam etmek için "Tamam" düğmesine tıklayın.
- İkinci kutuya da harf uzunluğunu girin ve "Tamam" ı tıklayın. Sayıları ayırmak için virgül kullanın.
Son olarak, bulunan tüm kelimeler sarı renkle vurgulanacaktır.
Kelime Sorunlarını Düzeltin
Çoğu zaman, Word'de çeşitli sorunların ortaya çıkması muhtemeldir. Bazı ciddi olanlar, yazılımın çökmesine bile yol açabilir. ve bir bozuk kelime değerli verilerin kaybolmasına neden olabilir. Bu nedenle, bir sorun ortaya çıktığında hemen harekete geçmelisiniz.
Yazar Tanıtımı:
Vera Chen bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. Excel bozulması hem de pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com