Merhaba arkadaşlar cari hesap programı yapmaya çalıştım. Listelerdeki verilere çift tıklayarak metin kutularına almayı beceremedim. Gerçi daha çok eksiğim var. Başaramadığım diğer konular içi de sizlerden yardım isteyeceğim. Yardımlarınız için şimdiden teşekkürler.

Private Sub Form_Current() olay yordaminda ki yeni kayda git eylemini silin ve liste guncelleme sonrasi olay yordamini kayit bulmasi icin
Private Sub Liste?_AfterUpdate()
Me.RecordsetClone.FindFirst "[S_No]=" & CLng(Nz(Me.Liste?.Column(0), 0))
Me.Bookmark = Me.RecordsetClone.Bookmark
End Sub
seklinde degistirin.
VBA editoru esnasinda yukarida ki arac cubugu Debug, compile eylemi ile kodlarin arasinda uyumsuz satirlari kontrol edebilirsiniz.

Çok teşekkürler hocam ellerinize sağlık.

Hocam sizin daha özce başka bir dosyama eklediğiniz aşağıdaki kod ile Musteriler formundaki FirmaAdii metin kutusundaki Firma adını SatisBilgilerindeki FirmaAdi metin kutusuna taşıyabiliyordum. Aşağıdaki kod bu dosyamda çalışmadı.

Forms("Satisbilgileri").FirmaAdi = Forms("Musteriler").FirmaAdii

(05-06-2016, 01:28)kenann demiş ki: Forms("Satisbilgileri").FirmaAdi = Forms("Musteriler").FirmaAdii

Liste kutusu guncelleme sonrasi kaydi bul ile Diger formdan veri getir farkli islemler. Projede liste kutusuna cift tiklandiginda yeni kayda git eylemi var ve liste kutusu guncellendirilmesi ile de kaydi bul kodlari oldugundan istenileni form yapamiyor. Eklenen uygulamaniz uzerinde benzer islemler ile guncellemeyi asagidaki dosyada bulabilirsiniz.
  Kenan_Ornek.rar (Boyut: 110,27 KB / İndirilme: 102)