Hücre Dolgu Rengi Bilgisi...

[mumugul]

Merhaba
Hücrelerin dolgu rengi bilgisini yine herhangi bir hücrede nasıl gösterebiliriz. Makro ile yapabiliyorum ama daha kolay bir fonksiyon yada uygulama varmıdır. :yardim: Teşekkürler.

[Levent Menteşoğlu]

Merhaba, hoşgeldiniz.

Hücrenin dolgu renginin sayısal değerini gösteren bir fonksiyon bildiğim kadarıyla yok, fakat bununla ilgili fonksiyon makro ile oluşturulabilir. Aşağıdaki örneği deneyebilirsiniz.

selamlar

Function dolgurengi(a)
dolgurengi = [a].Interior.ColorIndex
End Function

[jale]

Merhaba :hey:

Dolgu rengi için:
Function GetShadeColorInfo(Cell As Range)
Application.Volatile
GetShadeColorInfo = Cell.Interior.ColorIndex
End Function

Font rengi için:
Function GetFontColorInfo(Cell As Range)
Application.Volatile
GetFontColorInfo = Cell.Font.ColorIndex
End Function