Word Belgenizdeki Metinleri Üst Simgeye veya Alt Simgeye Toplu Değiştirmenin 2 Yolu

kelime çözümleri Eylül 28, 2025

Bugünün makalesinde, Word belgenizdeki metinleri üst simge veya alt simge olarak toplu olarak değiştirmenin 2 yolunu göstermek istiyoruz.

Bazen, özellikle aynı metnin birden fazla örneği olduğunda, Word belgesindeki belirli metinleri üst simge veya alt simgeye dönüştürmemiz gerekebilir. Bu gibi durumlarda, toplu değiştirme en çok ihtiyacımız olan şeydir. Bu nedenle, görevi gerçekleştirmeniz için 2 hızlı yöntem sunuyoruz.

Yöntem 1: “Bul ve Değiştir” Özelliğini Kullanın

Gelecek içeriklerde “örnek kullanacağız”DataNumen Word Repair v2.5” bizim gösterimiz olarak. Amacımız “v2.5” alt simge olarak değiştirmektir.

Öncelikle “Ana Sayfa” sekmesine tıklayın.
Daha sonra “Bul ve Değiştir” iletişim kutusunu açmak için “Değiştir”e tıklayın.
Önce "Neyi bul" metin kutusuna "v2.5" yazın. Metinden önce bir boşluk bırakmayı unutmayın.
Ardından "Şununla değiştir" metin kutusuna "v2.5" yazın. Bu sefer metinden önce boşluk yok.
Ardından, daha fazla seçeneği genişletmek için “Diğer” düğmesine tıklayın.
Şimdi "Biçimlendir"i tıklayın ve "Yazı Tipi"ni seçin.
"Yazı Tipi Bul" iletişim kutusunda, "Üst Simge" veya "Alt Simge" kutusunu işaretleyin.
Ardından "Tamam" ı tıklayın.
Son olarak “Tümünü Değiştir” düğmesine tıklayın.

Efekti buradan kontrol edebilirsiniz:

Yöntem 2: Word Makrosunu Çalıştırarak Toplu Değiştirme

Başlangıç olarak, VBA editörünü tetiklemek için “Alt+ F11” tuşlarına basın.
Ardından “Normal” projesine ve ardından “Ekle” sekmesine tıklayın.
Açılır menüden "Modül"ü seçin.
Daha sonra kodlama alanını açmak için yeni modüle çift tıklayın.
Aşağıdaki makroyu oraya yapıştırın:

Sub ReplaceTheTextAsSubscript()
  Dim strSelectText As String
  Dim strReplaceText As String
 
  strSelectText = InputBox("Enter the text you want to search", "Select text", "For example: v2.5")
  strReplaceText = InputBox("Enter the text you want to replace with", "Replace text", "For example:v2.5")
 
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find.Replacement.Font
    .Superscript = False
    .Subscript = True
  End With
  With Selection.Find
    .Text = strSelectText
    .Replacement.Text = strReplaceText
    .Forward = True
    .Wrap = wdFindContinue
    .Format = True
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Çalıştıra tıkla".
İlk önce “Metin seç” kutusu var. Bulgu metninizi girin ve "Tamam"a tıklayın. Bu durumda, “ v2.5” yazın.
Sonra “Metni değiştir” kutusu var. Değiştirme metnini buraya girin ve "Tamam" ı tıklayın. “v2.5” yazın.

Metinleri üst simge olarak değiştirmeniz gerekirse, bu makroyu kullanabilirsiniz:

Sub ReplaceTheTextAsSuperscript()
  Dim strSelectText As String
  Dim strReplaceText As String
 
  strSelectText = InputBox("Enter the text you want to search", "Select text", "For example: v2.5")
  strReplaceText = InputBox("Enter the text you want to replace with", "Replace text", "For example:v2.5")
 
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find.Replacement.Font
    .Superscript = True
    .Subscript = False
  End With
  With Selection.Find
    .Text = strSelectText
    .Replacement.Text = strReplaceText
    .Forward = True
    .Wrap = wdFindContinue
    .Format = True
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Belge Hatalarını Düzeltin

Word'deki hatalar çoğumuz için yabancı değil. Bir Word hatası şu sonuçlara yol açabilir: bozuk docx dosya. Böyle bir sorunu çözmek için, bozuk belgeyi kurtarmak için kalifiye ve profesyonel bir araç kullanmanız gerekir.

Yazar Tanıtımı:

Vera Chen bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. bozuk xlsx hem de pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com