A1 hücresinin yazı tipi rengine göre B1 hücresi yazı tipi rengi

[kaspersky]

A1 hücresinin yazı tipi rengine göre B1 hücresi yazı tipi renginin değişmesini istiyorum. Örneğin A1 hücresi yazı tipi rengi kırmızı ise B1 yazı tipi rengi de kırmızı olsun. Nasıl yapabilirim ?

 

[Korhan Ayhan]

İlgili sayfanızın kod bölümüne uygulayıp deneyiniz.

Font rengini değiştirip bir hücreye tıkladığınızda istediğiniz işlem gerçekleşecektir.

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Range("B1").Font.ColorIndex = Range("A1").Font.ColorIndex
End Sub

 

[kaspersky]

Çok teşekkür ederim, denedim gayet güzel çalışıyor.