Bu yazıda, size Word belgenizdeki vurgu rengini değiştirmek için 2 yararlı yöntem göstermekten mutluluk duyuyoruz.
Bazen farklı içerikleri farklı renklerle ön plana çıkarabilirsiniz. Ancak yazı tipi renginden farklı olarak, belirli bir vurgu rengindeki metinleri bulmak ve onu başka bir renkle değiştirmek için “Bul ve Değiştir” özelliğini kullanamazsınız.
Bu nedenle, bazı geçici çözümlere ihtiyacımız olacak. Aşağıda farklı durumlar için 2 yol mevcuttur.
Yöntem 1: Tüm Vurgu Renklerini Aynı Renkle Değiştirin
"Bul ve Değiştir" iletişim kutusuyla ilişkili vurgu rengi, Vurgu simgesinde seçili olan geçerli renktir.
- Öncelikle “Ana Sayfa” sekmesi altında “Yazı Tipi” grubunda “Metin Vurgu Rengi” komutundaki açılır düğmeyi tıklayın. Tüm vurgu renklerini değiştirmek istediğiniz rengi seçin. Örneğin burada “Parlak Yeşil”i seçiyoruz.
- Ardından, "Bul ve Değiştir" iletişim kutusunu tetiklemek için "Ctrl + H" tuşlarına basın.
- İmleci "Neyi bul" metin kutusunun içine getirin.
- Daha fazla seçenek ortaya çıkarmak için "Diğer"e tıklayın ve "Biçimlendir"e tıklayın.
- Ve "Vurgula"yı seçin.
- Sonra imleci "Şununla değiştir" kutusunun içine getirin ve 4. ve 5. adımları tekrarlayın.
- Son olarak, "Tümünü Değiştir" i tıklayın.
Artık tüm vurgu renklerini parlak yeşille değiştirdiniz.
Yöntem 2: Belirli Bir Vurgu Rengini Diğeriyle Değiştirme
Bu görevi gerçekleştirmek için bir makro gereklidir.
- Öncelikle, VBA düzenleyicisini açmak için “Alt+F11” tuşlarına basın.
- Ardından, sol sütundaki "Normal" projesine tıklayın.
- Ardından menü çubuğundaki “Ekle” sekmesine tıklayın.
- Ve bu açılır menüden "Modül"ü seçin.
- Yeni modülü çift tıklayarak açın.
- Şimdi aşağıdaki kodları yapıştırın:
Sub ReplaceOneHighlightColorToAnother()
Dim strFindColor As String
Dim strReplaceColor As String
Dim objDoc As Document
Dim objRange As Range
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
strFindColor = InputBox("Specify a color (enter the value):", "Specify Highlight Color")
strReplaceColor = InputBox("Specify a new color (enter the value):", "New Highlight Color")
With Selection
.HomeKey Unit:=wdStory
With Selection.Find
.Highlight = True
Do While .Execute
If Selection.Range.HighlightColorIndex = strFindColor Then
Set objRange = Selection.Range
objRange.HighlightColorIndex = strReplaceColor
Selection.Collapse wdCollapseEnd
End If
Loop
End With
End With
Application.ScreenUpdating = True
End Sub
- Ardından "Çalıştır" düğmesine tıklayın veya "F5" tuşuna basın.
- Ardından "Vurgu Rengini Belirt" kutusuna değiştirilecek rengi temsil eden bir değer girin. Belirli bir rengin karşılık gelen değerini almak için bu bağlantıyı ziyaret edebilirsiniz: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex
- Örneğin sarı rengi parlak yeşil ile değiştirmek istiyorsak “Specify Highlight Color” kutusuna “7” yazıp “OK” butonuna tıklıyoruz.
- Ardından “Yeni Vurgu Rengi” kutusuna yeni rengin bir değerini girin ve “Tamam” ı tıklayın.
İşte sarıyı parlak yeşille değiştirmenin olası sonucu.
Veri Kaybı Felaketinden Kaçının
Word, günlük işlerimizde çok büyük bir yardımcıdır. Bu nedenle, çöktüğünde getirebileceği felaketi hayal etmek zor değil. Kritik verileri kaybetmemek için bir kelime düzeltme araç önceden. Böyle bir yardımcı program elinizin altındayken, veri kaybı konusunda endişelenmenize gerek yoktur.
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







