Textbox renklendirme

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Textbox renklendirme

İleti#1)  Candan55 » 24 Oca 2023 17:51

Merhaba arkadaşlar; Textbox29'dan Textbox54'e kadar olan textboxlar için;

Açılışta : TextBox29-54.BackColor = vbWhite
Sıfır ise : TextBox29-54.BackColor = vbWhite
Sıfırdan büyükse : TextBox29-54. > 0 Then TextBox29-54.BackColor = vbYellow

Diğer textboxlara dokunmaması lazım.
Yukardaki kodu mantık çerçevesinde yerleştiremedim bir türlü.
Bir de bu kod "UserForm_Initialize" içinde mi olmalı yoksa ayrı "change" mi olmalı.
Yardımlarınız için şimdiden teşekkürler.
Kullanıcı avatarı
Candan55
Yeni Başlamış
 
Kayıt: 18 Nis 2020 17:01
Meslek: Öğretmen
Yaş: 23
İleti: 54
 
Cinsiyet: Bayan
Bulunduğunuz İl / Semt: Samsun

Yıllık Maaş Bordrosu Hesaplama 2022

Cevap: Textbox renklendirme

İleti#2)  Yken » 24 Oca 2023 18:25

Açılışta zaten beyaz geliyor, bunun için bir şey gerekmez. Farklı bir renk isterseniz :
UserForm_Initialize içine:
Kod: Tümünü seç
Private Sub UserForm_Initialize()
TextBox1.BackColor = vbRed
End Sub


Açıldıktan sonraki veri girişlerinin durumuna göre ise TextBox1_Change içine:
Kod: Tümünü seç
Private Sub TextBox1_Change()
If TextBox1.Value > 0 Then
TextBox1.BackColor = vbYellow
Else
TextBox1.BackColor = vbWhite
End If
End Sub
Kullanıcı avatarı
Yken
Siteye Alışmış
 
Kayıt: 07 Kas 2014 11:06
Meslek: Muhasebe
Yaş: 57
İleti: 212
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Textbox renklendirme

İleti#3)  Candan55 » 24 Oca 2023 18:52

Teşekkür ederim. Ancak verdiğiniz kod sadece TextBox1 için görünüyor.
Benim istediğim, sıralı halde olan TextBox29 dan başlayıp TextBox54'e kadar toplam 25 kutuyu renklendirmek.
Tek tek 25 adet "Private Sub TextBox1_Change()" ayarlamak uzun ve yorucu. Üstelik değiştirmesi de zor.
Kullanıcı avatarı
Candan55
Yeni Başlamış
 
Kayıt: 18 Nis 2020 17:01
Meslek: Öğretmen
Yaş: 23
İleti: 54
 
Cinsiyet: Bayan
Bulunduğunuz İl / Semt: Samsun


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 4 misafir

Bumerang - Yazarkafe