Soru Commandbutton renklendirme

[35ibo45]

Arkadaşlar selam.
Commandbutton2 ile açtığım userform1 üzerinde bulunan optionbutton1'i seçersem commandbutton2 yeşil renk, optionbutton2'yi seçersem commanbutton2 kırmızı renk olsun.
Şimdiden teşekkürler.

 

[Korhan Ayhan]

Deneyiniz.

Bold bölümü kendi dosyanıza göre revize edersiniz.

Private Sub OptionButton1_Click()
    If Me.ActiveControl Then Sayfa1.CommandButton2.BackColor = vbGreen
End Sub

Private Sub OptionButton2_Click()
    If Me.ActiveControl Then Sayfa1.CommandButton2.BackColor = vbRed
End Sub

 

[35ibo45]

If Me.ActiveControl Then Sayfa1.CommandButton2.BackColor = vbRed

Sayın Korhan AYHAN.
Kodları uyarladım fakat çalışmıyor. Renklendirme olmadı.

 

[Korhan Ayhan]

Ben denedim ve oluyor... Sizdeki durumu bilemiyorum.

 

[35ibo45]

Sayın Korhan AYHAN.
Kodları uyarladım fakat çalışmıyor. Renklendirme olmadı.

Tamam tamam sayın hocam..
Sorun benden kaynaklı. Sayfa1'i değiştirmeyi unutmuşum.
İşlem tamam.
Çok çok teşekkür ederim.
İlginize, bilginize, emeğinize sağlık.