- Katılım
- 14 Mayıs 2011
- Mesajlar
- 2,185
- Excel Vers. ve Dili
- Excel 2003 Türkçe
Merhaba İyi Akşamlar
İyi Çalışmalar
TExtBoxta ki Sayının Durumuna
Göre Renk Değiştirmesini Yapmak
İstiyorum Bu Konuda
Aşağıdaki Kodu Nasıl Düzenlemeliyim
Yardımcı Olabilirseniz Sevinirim
İyi Çalışmalar.
Private Sub TextBox30_Change()
TextBox30 = UCase(TextBox30)
TextBox30.BackColor = vbBlack
If UCase(TextBox30.Text) = "750,00 TL" Then TextBox30.BackColor = vbBlue 'EŞİTSE
If UCase(TextBox30.Text) = ">750,00 TL" Then TextBox30.BackColor = vbRed 'BÜYÜKSE
If UCase(TextBox30.Text) = "<750,00 TL" Then TextBox30.BackColor = vbGreen 'KÜÇÜKSE
İyi Çalışmalar
TExtBoxta ki Sayının Durumuna
Göre Renk Değiştirmesini Yapmak
İstiyorum Bu Konuda
Aşağıdaki Kodu Nasıl Düzenlemeliyim
Yardımcı Olabilirseniz Sevinirim
İyi Çalışmalar.
Private Sub TextBox30_Change()
TextBox30 = UCase(TextBox30)
TextBox30.BackColor = vbBlack
If UCase(TextBox30.Text) = "750,00 TL" Then TextBox30.BackColor = vbBlue 'EŞİTSE
If UCase(TextBox30.Text) = ">750,00 TL" Then TextBox30.BackColor = vbRed 'BÜYÜKSE
If UCase(TextBox30.Text) = "<750,00 TL" Then TextBox30.BackColor = vbGreen 'KÜÇÜKSE