صباح الخير جميعا وجمعة مباركة ان اشاء الله للجميع للأهمية رجاءاً لدي مشكلة عند استخدام كود حفظ التقرير بنوع PDF حيث اني استخدمه في نموذج مستمر وأرغب عند الضغط عليه أن يقوم بحفظ تقرير سجل محدد فقط وليس كامل السجلات.. مرفق المثال مع صورة http://www.arab4load.info/download150133.html'>http://www.arab4load.info/download150133.html http://www.up-00.com/'> الكود : Private Sub Command11_Click() Dim LResponse As Integer Dim MyFiLeName As String If Not NoData Then ' checks for no data event to prevent a mis fire DoEvents LResponse = MsgBox("Do you wish to Save the report", vbYesNo, "Save Now or loose it") If LResponse = vbYes Then MyFiLeName = "D:\New PDF Forms\" & Format([TabCompName]) & Format(Now, "dd-mm-yyyy hhnnss") & ".pdf" DoCmd.OutputTo acOutputReport, "TabCompanies", acFormatPDF, MyFiLeName, True DoEvents If LResponse = vbNo Then DoCmd.CancelEvent Else End If End If End If End Sub