Soru combobox renklendirme

[sirkülasyon]

For a = 3 To 23
    If a < 10 Or a > 12 Then
        Me.Controls("combobox" & a).ColumnCount = 1
        Me.Controls("combobox" & a).RowSource = "DATA!P1:P" & [DATA!P65536].End(3).Row
      

    End If
Next

döngü ile sayfadan comboboxlara veri aldım. Ancak bir konuda yardımınıza ihtiyacım var.
comboboxların açılır listesinde ki veri "Var" ise yeşil "Yok" ise kırmızı olmasını döngüye nasıl ekleyebilirim?

 

[Korhan Ayhan]

ComboBox ve Listbox nesnelerinde listelenen verileri satır bazında renklendiremezsiniz. (Biçimlendiremezsiniz.)

Yapacağınız biçimlendirme listelerdeki tüm öğelere uygulanır.

 

[sirkülasyon]

teşekkür ederim korhan abi.
Hayırlı Ramazanlar