1.formda Liste Çift Tıklandığında İlgili Alanın Kaydını 2.forma Çekmede Hata

28/11/2018, 08:15

Oğuz Türkyılmaz

Merhabalar

Stok kartı formunda StokGrup Ekle fonksiyonum çalışır vaziyette ve ben bu kodu F_100_Parametreler Formundan diğer StokMarka ve StokModel Ekle butonları için çalışır hale getiremedim. Resimde görülen çalışır vaziyetteki kodu altında ifadeye çevirdiğim satırlardaki şekilde değiştirdim ama doğal olarak burada hangi ifadeleri kullanmam gerektiğini bilmediğimden hata aldım. Bu kodu nasıl yazmalıyım. Teşekkürler.




29/11/2018, 16:17

ozanakkaya

Merhaba, 


Liste kutusunun çift tıklandığında olayındaki kod eksik. Geçerli kodlamaya göre sadece cboStokGrup isimli açılan kutuya işlem yapar. lstListe isimli liste kutusunun çift tıklandığında olayındaki kodu aşağıdaki ile değiştirerek deneyiniz.

KaynakSecimi = Me.OpenArgs
   
Select Case KaynakSecimi

 
 Case "StokGrup"
 
     Forms!F_010_Stok.SetFocus
     Forms!F_010_Stok!cboStokGrup = lstListe.Column(1)
     DoCmd.Close acForm, "F_100_Parametreler"


 Case "StokMarka"

     Forms!F_010_Stok.SetFocus
     Forms!F_010_Stok!cboStokMarka = lstListe.Column(1)
     DoCmd.Close acForm, "F_100_Parametreler"

 Case "StokModel"

     Forms!F_010_Stok.SetFocus
     Forms!F_010_Stok!cboStokModel = lstListe.Column(1)
     DoCmd.Close acForm, "F_100_Parametreler"

   
'    Case "CariGrup"

'      Forms!F_010_Stok.SetFocus
'      Forms!F_010_Stok!cboStokGrup = lstListe.Column(1)
'      DoCmd.Close acForm, "F_100_Parametreler"
   
29/11/2018, 16:47

Oğuz Türkyılmaz

Ozan Bey teşekkür ederim. Sorunsuz çalışıyor. Herşey gönlünüzce olsun.