Excelde Yazılı metindeki bir kelimeyi bold yapmak

[HAKKI34]

Merhaba
Excel de yazılmış bir metinin içindeki belli bir kelimeyi bulup otomatik onları bold yapabilir miyiz.

 

[HAKKI34]

Cevabı buldum.. Ctrl+F basıp Değiştir kısmına gelip
Yeni değer sekmesinin seçeneğinden yapılabiliyoruz..

 

[turist]

Cevabı bulmuşsunuz.(CTRL+ H kısa yolu ile).
Ayrıca macro ile de mümkündür.

 

[Murat OSMA]

■ Kod ile alternatif;

Sub Emre()
    Dim Rky As Variant, a As Integer, bul As Integer
    Rky = Split([a1], " ")
    For a = LBound(Rky) To UBound(Rky)
        If Rky(a) = [D1] Then
            bul = InStr([a1], [D1])
            [a1].Characters(bul, Len(Rky(a))).Font.Bold = True
            [a1].Characters(bul, Len(Rky(a))).Font.ColorIndex = 3
        End If
    Next a
    a = Empty: bul = Empty: Rky = Empty
End Sub

D1 hücresindeki veriyi A1 hücresinde bulur ve renklendirip kalın yapar...