M

Çözüldü UserForm Üzerinde Bulma Silme Değiştirme Kaydetme

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
M

mhezer

Site Üyesi
Excel Versiyonu
Excel 365
Excel Sürümü
64 Bit
Excel Dili
İngilizce
Merhaba,
Ekli dosyamda UserForm üzerinden Kayıt işlemini başarılı bir şekilde yapabilmekteyim. Listboxtan veri seçtiğimde TextBoxlara alıyorum. textboxlarda değişiklik yapıp Güncelle dediğinde satırlara değerler yerine ya (0) sıfır yazıyor yada boş bırakıyor.

Değerli katkılarınız için teşekkür ederim.
 

Ekli dosyalar

Çözüm
C
@mhezer
sil ve bul 'u yapmamıştım
Buldoldur kodu yazıldı ancak eksik geri kalanı siz doldurun
"" ların yerine Sheet3.Cells(satir, 4) gibi yazın
Sub bulDoldur(satir As Variant)

Me.txtAdi = Sheet3.Cells(satir, 4)
Me.txtSoyadi = Sheet3.Cells(satir, 5)
Me.txtIletisim = ""
Me.txtAdress = ""
Me.cmdDistrict = ""
Me.txtKapiNo = ""
Me.txtDaireNo = ""
Me.txtPostaKodu = ""
Me.txtMuhtarlikAdi = ""
Me.cmdSandikAlani = ""
Me.txtSandikSeriNo = ""...
Tarihe göre sırala Oylamaya göre sırala
@mhezer
sil ve bul 'u yapmamıştım
Buldoldur kodu yazıldı ancak eksik geri kalanı siz doldurun
"" ların yerine Sheet3.Cells(satir, 4) gibi yazın
Sub bulDoldur(satir As Variant)

Me.txtAdi = Sheet3.Cells(satir, 4)
Me.txtSoyadi = Sheet3.Cells(satir, 5)
Me.txtIletisim = ""
Me.txtAdress = ""
Me.cmdDistrict = ""
Me.txtKapiNo = ""
Me.txtDaireNo = ""
Me.txtPostaKodu = ""
Me.txtMuhtarlikAdi = ""
Me.cmdSandikAlani = ""
Me.txtSandikSeriNo = ""
Me.txtSandikSiraNo = ""
Me.cmdGorevi = ""
Me.txtAciklama1 = ""
Me.txtAciklama2 = ""
Me.txtAciklama3 = ""
Me.txtEskiSandikNo = ""
Me.TextBox1 = ""
End Sub
Sil Update tamam
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
Çözüm
Merhaba Değerli Hocalarım,
Problemimi çözümü konusunda destekleri sayesinde çalışmamın bu bölümünü tamamlamış bulunuyorum. Konu bu başlıkta tamamlanmıştır. @cesur hocama değerli katkılarından dolayı teşekkür ediyorum.
 
Oyla 0 Olumsuz oyla
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Benzer Konular Popüler İçerikler Daha Fazlası

Üst