[Yardım]  COMBOBOX SEÇİMİ İLE TEXT BOX GÜNCELLENMESİ

Açılır liste kutusu.

COMBOBOX SEÇİMİ İLE TEXT BOX GÜNCELLENMESİ

İleti#1)  nurikoo34 » 07 Kas 2018 18:06

Arkadaşlar merhaba,
Excel.vba.net sayesinde buralara kadar gelebildim, bakkal takip tablosu yaparken, BORÇ_DEFTERİ Userfrom sayfası içerisinde ComboBox1 tan kişi seçimi yapılınca o kişinin açıklaması borcu ve tarihi alt kısımdaki textboxlara gelsin istiyorum ve textboxtanda değiştirebileyim isyiroum, hepsini yapabiliyorum ama tutar kısmı geldiğinde tl yazısı eksik geliyor comboxtan farklı kişiyi seçip aynı kişiye tekrar geldiğimde bilgilerin diğer bir kısmı düzeliyor. kontrol eder misiniz neyi eksik yaptım.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
nurikoo34
 
Kayıt: 01 Kas 2018 17:40
Meslek: tekniker
Yaş: 22
İleti: 4
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul/küçükçekmece

Cevap: COMBOBOX SEÇİMİ İLE TEXT BOX GÜNCELLENMESİ

İleti#2)  kanakan52 » 07 Kas 2018 18:25

Merhaba,

Label15.Caption = Format(Label15.Caption, "#,##0.00")& TL gibi düzeltirsen sanıyorum halledebilirsin..

Emin değilim ama..
Kullanıcı avatarı
kanakan52
Siteye Alışmış
 
Adı Soyadı:Ümit AKBULUT
Kayıt: 15 May 2013 17:56
Konum: TÜRKİYE
Meslek: muhasebe
Yaş: 35
İleti: 355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: ORDU

Cevap: COMBOBOX SEÇİMİ İLE TEXT BOX GÜNCELLENMESİ

İleti#3)  nurikoo34 » 08 Kas 2018 09:33

TAM ANLATAMADIM SANIRIM
BU ALT KISIM SORUNSUZ ÇALIŞIYOR

Private Sub ComboBox1_AfterUpdate()

Label15.Caption = Worksheets("BORÇ_LİSTESİ").Range("C1").Value
Label15.Caption = Format(Label15.Caption, "#,##0.00 \TL")

TextBox1.ControlSource = "BORÇ_LİSTESİ!C22"
TextBox2.ControlSource = "BORÇ_LİSTESİ!C23"
TextBox3.ControlSource = "BORÇ_LİSTESİ!C24"
TextBox4.ControlSource = "BORÇ_LİSTESİ!C25"
TextBox5.ControlSource = "BORÇ_LİSTESİ!C26"
TextBox6.ControlSource = "BORÇ_LİSTESİ!C27"
TextBox7.ControlSource = "BORÇ_LİSTESİ!C28"
TextBox8.ControlSource = "BORÇ_LİSTESİ!C29"
TextBox9.ControlSource = "BORÇ_LİSTESİ!C30"
TextBox10.ControlSource = "BORÇ_LİSTESİ!C31"

TextBox11.ControlSource = "BORÇ_LİSTESİ!D22"
TextBox12.ControlSource = "BORÇ_LİSTESİ!D23"
TextBox13.ControlSource = "BORÇ_LİSTESİ!D24"
TextBox14.ControlSource = "BORÇ_LİSTESİ!D25"
TextBox15.ControlSource = "BORÇ_LİSTESİ!D26"
TextBox16.ControlSource = "BORÇ_LİSTESİ!D27"
TextBox17.ControlSource = "BORÇ_LİSTESİ!D28"
TextBox18.ControlSource = "BORÇ_LİSTESİ!D29"
TextBox19.ControlSource = "BORÇ_LİSTESİ!D30"
TextBox20.ControlSource = "BORÇ_LİSTESİ!D31"

TextBox21.ControlSource = "BORÇ_LİSTESİ!E22"
TextBox22.ControlSource = "BORÇ_LİSTESİ!E23"
TextBox23.ControlSource = "BORÇ_LİSTESİ!E24"
TextBox24.ControlSource = "BORÇ_LİSTESİ!E25"
TextBox25.ControlSource = "BORÇ_LİSTESİ!E26"
TextBox26.ControlSource = "BORÇ_LİSTESİ!E27"
TextBox27.ControlSource = "BORÇ_LİSTESİ!E28"
TextBox28.ControlSource = "BORÇ_LİSTESİ!E29"
TextBox29.ControlSource = "BORÇ_LİSTESİ!E30"
TextBox30.ControlSource = "BORÇ_LİSTESİ!E31"

'------------------------------------------------------------------------------------------------------------------------------------------------------------

SORUNUM TAM OLARAK BU ALT KISIMDIR

ComboBox1 DEĞİŞTİRDİĞİMDE ALTTAKİ İŞLEMLERİ TAM YAPMIYOR

BEN BURADA TEXTBOX11-TEXTBOX20 ARASINI PARA BİRİMİ OLARAK GÖSTER DİYORUM ComboBox1 TIKLADIĞIMDA YANİ DEĞİŞİRDİĞİMDE SADECE 1 TANESİNİN FORMATINI TL YAPIYOR. BİR SONRAKİ TIKLADIĞIMDA BAŞKA BİRTANESİNİN FORMATINI TL YAPIYOR OYSA BEN HEPSİNİN FORMATINI AYNI ANDA YAP TL YAPSIN İSTİYORUM

TextBox11.Value = Format(TextBox11.Value, "#,##0.00 \TL")
TextBox12.Value = Format(TextBox12.Value, "#,##0.00 \TL")
TextBox13.Value = Format(TextBox13.Value, "#,##0.00 \TL")
TextBox14.Value = Format(TextBox14.Value, "#,##0.00 \TL")
TextBox15.Value = Format(TextBox15.Value, "#,##0.00 \TL")
TextBox16.Value = Format(TextBox16.Value, "#,##0.00 \TL")
TextBox17.Value = Format(TextBox17.Value, "#,##0.00 \TL")
TextBox18.Value = Format(TextBox18.Value, "#,##0.00 \TL")
TextBox19.Value = Format(TextBox19.Value, "#,##0.00 \TL")
TextBox20.Value = Format(TextBox20.Value, "#,##0.00 \TL")


TextBox21.Value = Format(TextBox21.Value, "dd.mmmm.yyyy")
TextBox22.Value = Format(TextBox22.Value, "dd.mmmm.yyyy")
TextBox23.Value = Format(TextBox23.Value, "dd.mmmm.yyyy")
TextBox24.Value = Format(TextBox24.Value, "dd.mmmm.yyyy")
TextBox25.Value = Format(TextBox25.Value, "dd.mmmm.yyyy")
TextBox26.Value = Format(TextBox26.Value, "dd.mmmm.yyyy")
TextBox27.Value = Format(TextBox27.Value, "dd.mmmm.yyyy")
TextBox28.Value = Format(TextBox28.Value, "dd.mmmm.yyyy")
TextBox29.Value = Format(TextBox29.Value, "dd.mmmm.yyyy")
TextBox30.Value = Format(TextBox30.Value, "dd.mmmm.yyyy")
Kullanıcı avatarı
nurikoo34
 
Kayıt: 01 Kas 2018 17:40
Meslek: tekniker
Yaş: 22
İleti: 4
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul/küçükçekmece

Cevap: Cevap: COMBOBOX SEÇİMİ İLE TEXT BOX GÜNCELLENMESİ

İleti#4)  nurikoo34 » 08 Kas 2018 09:35

[quote="nurikoo34"]TAM ANLATAMADIM SANIRIM
BU ALT KISIM SORUNSUZ ÇALIŞIYOR

Private Sub ComboBox1_AfterUpdate()

Label15.Caption = Worksheets("BORÇ_LİSTESİ").Range("C1").Value
Label15.Caption = Format(Label15.Caption, "#,##0.00 \TL")

TextBox1.ControlSource = "BORÇ_LİSTESİ!C22"
TextBox2.ControlSource = "BORÇ_LİSTESİ!C23"
TextBox3.ControlSource = "BORÇ_LİSTESİ!C24"
TextBox4.ControlSource = "BORÇ_LİSTESİ!C25"
TextBox5.ControlSource = "BORÇ_LİSTESİ!C26"
TextBox6.ControlSource = "BORÇ_LİSTESİ!C27"
TextBox7.ControlSource = "BORÇ_LİSTESİ!C28"
TextBox8.ControlSource = "BORÇ_LİSTESİ!C29"
TextBox9.ControlSource = "BORÇ_LİSTESİ!C30"
TextBox10.ControlSource = "BORÇ_LİSTESİ!C31"

TextBox11.ControlSource = "BORÇ_LİSTESİ!D22"
TextBox12.ControlSource = "BORÇ_LİSTESİ!D23"
TextBox13.ControlSource = "BORÇ_LİSTESİ!D24"
TextBox14.ControlSource = "BORÇ_LİSTESİ!D25"
TextBox15.ControlSource = "BORÇ_LİSTESİ!D26"
TextBox16.ControlSource = "BORÇ_LİSTESİ!D27"
TextBox17.ControlSource = "BORÇ_LİSTESİ!D28"
TextBox18.ControlSource = "BORÇ_LİSTESİ!D29"
TextBox19.ControlSource = "BORÇ_LİSTESİ!D30"
TextBox20.ControlSource = "BORÇ_LİSTESİ!D31"

TextBox21.ControlSource = "BORÇ_LİSTESİ!E22"
TextBox22.ControlSource = "BORÇ_LİSTESİ!E23"
TextBox23.ControlSource = "BORÇ_LİSTESİ!E24"
TextBox24.ControlSource = "BORÇ_LİSTESİ!E25"
TextBox25.ControlSource = "BORÇ_LİSTESİ!E26"
TextBox26.ControlSource = "BORÇ_LİSTESİ!E27"
TextBox27.ControlSource = "BORÇ_LİSTESİ!E28"
TextBox28.ControlSource = "BORÇ_LİSTESİ!E29"
TextBox29.ControlSource = "BORÇ_LİSTESİ!E30"
TextBox30.ControlSource = "BORÇ_LİSTESİ!E31"

'------------------------------------------------------------------------------------------------------------------------------------------------------------

SORUNUM TAM OLARAK BU ALT KISIMDIR

ComboBox1 DEĞİŞTİRDİĞİNDE ALTTAKİ İŞLEMLERİ TAM YAPMIYOR

BEN BURADA TEXTBOX11-TEXTBOX20 ARASINI PARA BİRİMİ OLARAK GÖSTER DİYORUM ComboBox1 TIKLADIĞIMDA YANİ DEĞİŞİRDİĞİMDE SADECE 1 TANESİNİN FORMATINI TL YAPIYOR. BİR SONRAKİ TIKLADIĞIMDA BAŞKA BİRTANESİNİN FORMATINI TL YAPIYOR OYSA BEN HEPSİNİN FORMATINI AYNI ANDATL YAPSIN İSTİYORUM

TextBox11.Value = Format(TextBox11.Value, "#,##0.00 \TL")
TextBox12.Value = Format(TextBox12.Value, "#,##0.00 \TL")
TextBox13.Value = Format(TextBox13.Value, "#,##0.00 \TL")
TextBox14.Value = Format(TextBox14.Value, "#,##0.00 \TL")
TextBox15.Value = Format(TextBox15.Value, "#,##0.00 \TL")
TextBox16.Value = Format(TextBox16.Value, "#,##0.00 \TL")
TextBox17.Value = Format(TextBox17.Value, "#,##0.00 \TL")
TextBox18.Value = Format(TextBox18.Value, "#,##0.00 \TL")
TextBox19.Value = Format(TextBox19.Value, "#,##0.00 \TL")
TextBox20.Value = Format(TextBox20.Value, "#,##0.00 \TL")


TextBox21.Value = Format(TextBox21.Value, "dd.mmmm.yyyy")
TextBox22.Value = Format(TextBox22.Value, "dd.mmmm.yyyy")
TextBox23.Value = Format(TextBox23.Value, "dd.mmmm.yyyy")
TextBox24.Value = Format(TextBox24.Value, "dd.mmmm.yyyy")
TextBox25.Value = Format(TextBox25.Value, "dd.mmmm.yyyy")
TextBox26.Value = Format(TextBox26.Value, "dd.mmmm.yyyy")
TextBox27.Value = Format(TextBox27.Value, "dd.mmmm.yyyy")
TextBox28.Value = Format(TextBox28.Value, "dd.mmmm.yyyy")
TextBox29.Value = Format(TextBox29.Value, "dd.mmmm.yyyy")
TextBox30.Value = Format(TextBox30.Value, "dd.mmmm.yyyy")
Kullanıcı avatarı
nurikoo34
 
Kayıt: 01 Kas 2018 17:40
Meslek: tekniker
Yaş: 22
İleti: 4
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul/küçükçekmece

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Forum ComboBox

Online Kullanıcılar

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

Bumerang - Yazarkafe