السلام عليكم
ماخدتش بالى انك عاملى اشاره مع اساتذتى الافاضل لان المعرف متغير للفلاحجى 😀
مشاركه مع معلمنا العزيز وشيخنا الجليل @ابوخليل جزاه الله عنا كل خير 💐
نفس كود استاذى العزيز مع تعديل صغير لتصفيه النموذج الفرعى لاذن الصرف ع رقم المخزن المراد الذهاب اليه
وفى نقطه تانيه نسيتها النموذج الفرعى لاذن الصرف تم تعديل مصدر السجلات من الجدول لاستعلام لنفس الجدول مباشر بالنموذج واضافه معيار [TempVars]![xNum] تحت حقل رقم المخزن
Private Sub رقم_مخزن_DblClick(Cancel As Integer)
Dim xNum As TempVar
TempVars!xNum = Me.رقم_مخزن.Value
Dim frmName As String
Dim stlink As String
frmName = "اذن الصرف"
stlink = "[رقم الفاتورة]=" & Me![رقم الفاتورة]
DoCmd.OpenForm frmName, , , stlink
End Sub
بالتوفيق
Database_1.accdb