Makro ile hücre içeriğini biçimlendirme.

[_GÜRCAN_]

Merhabalar,

Tüm excel sayfasında içeriği değişken olan hücrelerde, örnek ; [4/01] - başındaki '' [ '' ve sonundaki '' ] '' işaretlerinin biçiminin beyaz olmasını sağlaya bilirmiyiz,
sadece 4/01 olarak görünmesini istiyorum.

şimdiden vereceğiniz yanıtlar için teşekkür ederim.

 

[Necdet]

Merhaba,

Görünmesini istemiyorsanız köşeli parantezleri silin gitsin, bu daha pratik değil mi?

İlla makro istiyorum diyorsanız aşağıdaki kodları bir modüle ekleyip önce seçimi yapıp sonra çalıştırınız.

Sub Beyaz()

    Dim Hcr As Range, _
        i   As Integer
    
    For Each Hcr In Selection
        i = InStr(1, Hcr, "[")
        If i > 0 Then Hcr.Characters(i, 1).Font.Color = vbWhite
        i = InStr(1, Hcr, "]")
        If i > 0 Then Hcr.Characters(i, 1).Font.Color = vbWhite
    Next Hcr
    
End Sub

 

[_GÜRCAN_]

Merhaba,

Görünmesini istemiyorsanız köşeli parantezleri silin gitsin, bu daha pratik değil mi?

İlla makro istiyorum diyorsanız aşağıdaki kodları bir modüle ekleyip önce seçimi yapıp sonra çalıştırınız.

Sub Beyaz()

    Dim Hcr As Range, _
        i   As Integer
   
    For Each Hcr In Selection
        i = InStr(1, Hcr, "[")
        If i > 0 Then Hcr.Characters(i, 1).Font.Color = vbWhite
        i = InStr(1, Hcr, "]")
        If i > 0 Then Hcr.Characters(i, 1).Font.Color = vbWhite
    Next Hcr
   
End Sub

Necdet bey, köşeli parantezleri sildiğimde hücreyi tarihe çevirdiğinden silemiyorum. Teşekkür ediyorum.

 

[Necdet]

Merhaba,

Sütunu metne çevirmelisiniz.
1. Tüm [ karakterleri ' (tek tırnak) ile değiştirdiğinizde tarih sorunu ile karşılaşmazsınız.

 

[_GÜRCAN_]

Merhaba,

Sütunu metne çevirmelisiniz.
1. Tüm [ karakterleri ' (tek tırnak) ile değiştirdiğinizde tarih sorunu ile karşılaşmazsınız.

Necdet bey, metne çevirmek aklıma gelmemişti. yardımlarınız için çok teşekkürler.