inactive olayı

[syil]

Form üzerinde bulunan combobox tan herhangi bir değeri sectigimde yine aynı form üzerindeki textbox kutusunun inactive olmasını istiyorum.Nasıl yapabilirim bunu??İlgilenen arkadaşlara şimdiden teşekkürler...Herkese iyi çalışmalar!!!

 

[ibayarslan]

Denermisiniz

Private Sub ComboBox1_Change()
if combobox1.value={değer} then 
textbox1.enable=false
end if
End Sub

 

[syil]

"değer" yerine ne girmem gerekir combobox degerlerini sheet1 deki hücreden alıyorum mesela?

 

[syil]

Denedim olmadı "Method or data member not found" hatası verdi
yinede degerli vaktin icin Tesekkurler :hey:

 

[omerceri]

Private Sub ComboBox1_Change()
textbox1.enable=false
End Sub
şeklinde yaparsan olur ama daha sonra bir şekilde
textbox1.enable=True
olmalı ki yeniden değer seçebilmesin.

 

[syil]

Moderator arkadaşlardan yardımcı olacak varmı acaba,hata yı nasıl çözebilirim?? :yardim:

 

[omerceri]

sn syil
hata yok benim yazdığım kod senin işini görür ama yeniden comboBox'a girip değer seçebilmen için, örneğin bir düğmeye basıp comboBox'ı active etmelisin

 

[omerceri]

kusura balma soruyu iyi okuyamamışım textbox'a değer girebilmen için tabi gerekiyorsa textbox'ı active etmen gerekir yoksa bu kod çalışır.

 

[syil]

Sayın Ömerceri ekli dosyayı inceleyebilirmisiniz istedigim şeyin daha iyi anlaşılması açısından...teşekkürler ilgin için...

 

[omerceri]

çok özür dilerim
kod
textbox1.enable=false

"d"
unutulmuş
şeklinde olacak
textbox1.enabled=false
olmalı ona dikkat etmedim

 

[omerceri]

örnel ekte

 

[syil]

Haklısın Sn. ömerceri "Enabled" olmalı "enable" yerine...bu aşamada sorun çözüldü teşekkürler bunun için ancak ben sadece comboboxta "A" secilince textbox ın inactive olmasını istiyorum.bunu nasıl yapabiliriz....???

 

[omerceri]

ozaman
Private Sub ComboBox1_Change()
if combobox1.value="A" then
textbox1.enabled=true
else
textbox1.enabled=false
end if
End Sub

 

[omerceri]

bu gün iyi değilim boş yere ızdırap çektik

 

[syil]

Teşekkürler sayın omerceri istedigim olmuş eline sağlık öncelikle.Ek olarak birşey daha sormak istiyorum bu soruya paralel ,textbox inactive oldu ancak gölgeli olmadı yani textbox ın içininde form renginde olmasını istiyorum bu mümkünmü acaba???

 

[omerceri]

Private Sub ComboBox1_Change()
if combobox1.value="A" then
textbox1.enabled=true
TextBox1.BackColor = &H80000005
else
textbox1.enabled=false
TextBox1.BackColor = &H80000004
end if
End Sub

 

[algil]

Birde böyle deneyin Sn. syil

Private Sub ComboBox1_Change() 
if combobox1.value="A" then 
textbox1.visible=true 
else 
textbox1.visible=false 
end if 
End Sub

 

[ibayarslan]

Kusura bakmayın yazarken yanlış yazmışım enabled olmalıydı.
(smart tag'e insan alışınca demek notepad ile kod yazmayıda unutuyor)

 

[syil]

Sn Algil , verdiginiz kodlar a göre textbox tamamen ortadan kayboluyor ,ama ben textbox ın soluk olmasını istemiştim ,ilginiz için teşekkürler yinede,yanlış yapmazsak dogruyu bulamayız zaten .Her yanlış bizi dogruya yaklaştırır bunun için teşekkürler :arkadas:

 

[syil]

Sn. omerceri sizin kodlarınızı denedim ama olmadı ,sizde çalıştıysa dosyayı gönderebilirmisiniz zahmet olmazsa ....