kleur button veranderen

[fraanske82]

Hallo,

Ik wil graag de kleur van mij button laten veranderen als een cel is gevuld.

Let op cel staat op een ander tabbald als de button.

ik heb onderstaande maar werkt niet:
kan iemand mij helpen?

alvast bedankt!

Sheets("Extra Artikelen ").Select

If Range("B3").Value & Range("F3").Value > Empty Then CommandButton8.BackColor = vbGreen

 

[Wigi]

Verander de & al in een And.

 

[Hoornvan]

fraanske82,

Je heb toch wel een CommandButton geplaatst?
Als je een Knop heb geplaatst dan werkt de code niet.

De code heb ik net geprobeerd en werkt uitstekend.

Private Sub CommandButton1_Click()
If Range("B3").Value & Range("F3").Value > Empty Then CommandButton1.BackColor = vbGreen
If Range("B3").Value & Range("F3").Value = Empty Then CommandButton1.BackColor = vbRed
End Sub