ComboBox 'a şarta bağlı yazı

[Erdinç FIRTINA]

Değerli Forum üyeleri,
ComboBox2 'ye şarta bağlı olarak yazı yazdırmak için aşağıdaki kodu yazdım. Ancak error veriyor.
Yardımlarınız için şimdiden çok teşekkürler!!!

(Yapılmak istenen, ComboBox1 boşsa, ComboBox2 boş olsun, eğer Combobox1 doluysa ComboBox2'ye "TAMAM" yazsın.

Private Sub ComboBox1_Change()
If ComboBox1.Value = "" Then ComboBox2.Value = ""
Else
ComboBox2.Value = Range("ComboBox2") = "TAMAM"
End If
End Sub

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu denermisiniz.

Private Sub ComboBox1_Change()
If ComboBox1.Value = "" Then
ComboBox2.Value = ""
Else
ComboBox2.Value = "TAMAM"
End If
End Sub

 

[Erdinç FIRTINA]

Sayın Korhan AYHAN,

Size çok çok teşekkür ederim. Elinize, beyninize ve de karşılıksız yardımlarınız için yüreğinize sağlık!!!