hücre ve textbox bağlantısı

[hurkanpisirici]

bir hücrenin arka font rengini değiştirince ona bağlı textboxu ında arka fonunun aynı renk olmasını istiyorum böyle bir kod varmı acaba?

 

[Orion1]

Hücreyi renklendirdikten sonra hücreyi tekrardan seçmeniz gerekiyor.
Çalışma sayfasının kod bölümüne:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.BackColor = Target.Interior.Color

End Sub

 

[hurkanpisirici]

Hücreyi renklendirdikten sonra hücreyi tekrardan seçmeniz gerekiyor.
Çalışma sayfasının kod bölümüne:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.BackColor = Target.Interior.Color

End Sub

ben yapamadım galiba denedim ama olmadı.dosyayı gönderiyorum amacım userform1 üzerindeki veri giriş kontrolü diye bir textboxum var ve mtop sayfasında g28 hücresindeki rengi almasını istiyorum.süperman gibi yetiştiniz yine

 

[hurkanpisirici]

burda galiba hücre belirtmemişsiniz hocam

 

[Orion1]

ben yapamadım galiba denedim ama olmadı.dosyayı gönderiyorum amacım userform1 üzerindeki veri giriş kontrolü diye bir textboxum var ve mtop sayfasında g28 hücresindeki rengi almasını istiyorum.süperman gibi yetiştiniz yine

Hangi userform'un üzerinde ve hangi textbox.Herhalde bizde münencim değiliz.
Birde şifre koymuşsunuz. :mrgreen:

 

[hurkanpisirici]

çok pardon onlar kafamdaydı unutmuşum 1982 şifresi userform1 textbox20

 

[Seyit Tiken]

Bu şekilde bir deneyiniz. Ben burda Evren beye hak veriyorum. Şifreyle uğraşmak rahatsız edici bir durum.

Private Sub Worksheet_Change(ByVal Target As Range)
UserForm1.TextBox1.BackColor = Sayfa1.[a1].Interior.Color
End Sub

 

[Orion1]

Ekli dosyayı inceleyiniz.

 

[hurkanpisirici]

evren bey harika olmuş çok teşekkür ederim.sayın seyit bey sizede teşekkürler.deneme yanılma yöntemiyle öğrenmeye çalışıyorum o yüzden onuda denedim yaptım ve bidaha bozmamk için müdahele etmek istemedim haklsıınız kusura bakmayın ellerinize sağlık

 

[hurkanpisirici]

bu arada bende sayfanın kod bölümüne verdiğiniz kodu yazdım ama benim yaptığımda neden olmadı başka bir yerde değişiklik yaptınız mı acaba evren bey.tamam şimdi gördüm UserForm_Initialize() olayı

 

[hurkanpisirici]

şimdi şöyle bişey var ben o hücreye koşullu biçimlendirme uyguladım.hatalı kayıt olduğu zaman kırmızı yanmasını istedim oldu ama textbox rengi değişmedi.
benimde aklıma başka bişey geldi textbox ta hatalı kayıt yazınca kırmızı yansın olmazmı?

 

[Orion1]

ekli dosyayı inceleyiniz.

 

[hurkanpisirici]

şu dosya bi bitsin,sizin bilemiceğiniz ve yapamayacağınız bi soruyu mutlaka bulacağım teşekkürler