textbox rengi ile ilgili

[hurkanpisirici]

merhabalar textbox1 e a1 hücresinden veri alacağım.a1 hücremde koşullu biçimlendirme var ve verinin özelliğine göre arka rengi değişiyor ben textbox1 veri çağırdığım zaman arka rengide kendiliğinden gelmesini istiyorum yardımcı olacak bir arkadaş varmı acaba?

 

[Korhan Ayhan]

Selamlar,

Ekteki örnek dosyayı incelermisiniz.

 

[hurkanpisirici]

harikasınız çok teşekkür ederim

 

[hurkanpisirici]

peki bunu veri al butonu kullanmadan yapmak mümkünü bide hücredeki veri değiştiği an textboxt tada değişmesi mümkünmü

 

[Seyit Tiken]

Birde bu şekilde deneyiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
UserForm1.TextBox1 = Sayfa1.[a1]
If [a1] > 3 Then UserForm1.TextBox1.BackColor = &H80000005
If [a1] = vbNullString Then UserForm1.TextBox1.BackColor = &H80000005
[a1].Interior.ColorIndex = xlNone
If [a1] = 1 Then
UserForm1.TextBox1.BackColor = &HFF00F
[a1].Interior.ColorIndex = 4
ElseIf [a1] = 2 Then
UserForm1.TextBox1.BackColor = &HFF00FF
[a1].Interior.ColorIndex = 7
ElseIf [a1] = 3 Then
UserForm1.TextBox1.BackColor = &H80FFF
[a1].Interior.ColorIndex = 3
End If
End Sub

 

[hurkanpisirici]

istedğim buydu çok reşekkürler

 

[hurkanpisirici]

ama benim rakamlarım sabit olmayacak yani ben hücrenin rengi değiştiği an textbox ınkininde değişmesini istiyorum ama rakama göre değil ben hücreyi sarı yaptısam sarı olacak istediğim veriyi girebileceğim

 

[hurkanpisirici]

istediğim cevabı bir türlü bulamadım uyarlamaya çalıştım ama olmadı ?