Excel sayfasındaki verileri userformdaki textboxlara çağırarak başka bir sayfaya kaydediyorum ve userformdaki listboxta verilerim görünüyor. Verilerde güncelleme yapmak için listboxtaki verilere tıklama yaparak textboxlara verileri çağırdığımda bazı satırlardaki doğum tarihleri rakam olarak bazıları tarih olarak geliyor. Sorun nerde olabilir acaba. Yardımcı olabilirseniz sevinirim
-
Foruma hoş geldin 👋 Ziyaretçi
Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.
Giriş yap veya Şimdi kayıt ol
Çözüldü Textbox ta tarih sorunu
- Konuyu Başlatan LİNDA
- Başlangıç tarihi
- Cevaplar : 6
- Gösterim : 595
-
- Etiketler
- textbox ta tarih sorunu
Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Çözüm
Aşağıdaki gibi alırsanız tarihi durum düzelecektir.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
Teşekkür ederim ama kullandığım kodlar aşağıdaki sizin öneriniz denedim hata veriyor Veri aldığım satırı renkli olarak belirttim . Nerde yanlış yapıyorum
Private Sub Listbox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Me.TextBox1.Value = ListBox1.List(ListBox1.ListIndex, 1)
Me.TextBox2.Value = ListBox1.List(ListBox1.ListIndex, 2)
Me.TextBox3.Value = ListBox1.List(ListBox1.ListIndex, 3)
Me.TextBox4.Value = ListBox1.List(ListBox1.ListIndex, 4)
Me.TextBox5.Value = ListBox1.List(ListBox1.ListIndex, 5)
Me.TextBox6.Value = ListBox1.List(ListBox1.ListIndex, 6)
Me.ComboBox1.Value = ListBox1.List(ListBox1.ListIndex, 7)
Me.ComboBox2.Value = ListBox1.List(ListBox1.ListIndex, 8)
Me.TextBox7.Value = ListBox1.List(ListBox1.ListIndex, 9)
Me.TextBox8.Value = ListBox1.List(ListBox1.ListIndex, 10)
Me.TextBox9.Value = ListBox1.List(ListBox1.ListIndex, 11)
Me.ComboBox3.Value = ListBox1.List(ListBox1.ListIndex, 12)
Me.ComboBox4.Value = ListBox1.List(ListBox1.ListIndex, 13)
Me.TextBox10.Value = ListBox1.List(ListBox1.ListIndex, 14)
Me.TextBox11.Value = ListBox1.List(ListBox1.ListIndex, 15)
Me.TextBox12.Value = ListBox1.List(ListBox1.ListIndex, 16)
End Sub
Caylak
Destek Ekibi
Me.TextBox3.Value = ListBox1.List(ListBox1.ListIndex, 3) yerine;
Me.TextBox3.Value = CDate(ListBox1.List(ListBox1.ListIndex, 3)) dener misiniz?
Me.TextBox3.Value = CDate(ListBox1.List(ListBox1.ListIndex, 3)) dener misiniz?
Çözüm
Teşekkür ederim ama ay ve gün yer değişikliği yapıyor
Ekli dosyalar
Caylak
Destek Ekibi
Format(CDate(ListBox1.List(ListBox1.ListIndex,3)),"dd.mm.yyyy")
Çok teşekkür ederim yardımlarınız için sorun çözüldü . Emeğinize sağlık
- Durum