Merhaba, form açma kodu ile ilgili daha önce bilgilendirme yapmıştım.
Liste kutusunun çift tıklandığında olayına aşağıdaki kodu yazarak deneyiniz.
DoCmd.OpenForm "F_001_MUSTERITANIMLAMA", , , "[musterinumarasi]=" & Me![MusteriListesi]
(22/10/2018, 00:34)ozanakkaya yazdı: [ -> ]Merhaba, form açma kodu ile ilgili daha önce bilgilendirme yapmıştım.
Liste kutusunun çift tıklandığında olayına aşağıdaki kodu yazarak deneyiniz.
DoCmd.OpenForm "F_001_MUSTERITANIMLAMA", , , "[musterinumarasi]=" & Me![MusteriListesi]
Ozan bey iyi geceler yanıtınız için teşekkür ederim. Ben bütün gün neden openform komutuyla yapılamıyor da bu kadar uzun
bir kod yazılmış acaba diye neyin ne olduğunu anlamaya çalıştım. İki kodda aynı kapıya çıkmıyormu benmi yanlış anlıyorum, neyi göremiyorum. Sn.Mehmet DEMİRAL'ın
süzülen veriye tıklayınca form üzerinde o veriye gitmesi için, list1'in güncellenme sonrasına
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[musterinumarasi] = " & Str(Nz(Me![MusteriListesi], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
yazarsak süper olur dediği
konuyla ilgili makalenizden dolayı soruyorum affınıza sığınarak. Tek satırlık basit bir kodla halledilebilen bir sonuç için yazılan bu uzun kodda diğerinden farklı olarak daha farklı neler elde edilebilir. Sadece meraktan soruyorum cevap vermesenizde olur. Ben
Vba ile ilgili açıklamaları okumaya devam edeyim. İyi geceler dilerim.
Merhaba. Sizin kod liste kutusu çift tıklandığında liste kutusunun bulunduğu formda kayıt bulur. Benim eklediğim kod ise liste kutusu çift tıklandığında seçilen kayıt ile eşleşen farklı formu açtırır.