للأسف أنا بتعب جداً لما يكون اسماء الجداول والنماذج وبارماتراتها باللغة العربية لأنها بتلخبط البرمجة ولازم أكون مركز جداً وهذا يتعب نظري أكثر سامحني ابن عمي !!!!!!!
اما اذا ساعدك اخواني كان بها أو ليس أمامك إلا التحويل للغة الانجليزية .
تفضل أخي .
' بمديول عام نلصق
Public Function Baba(strReportName As String)
DoCmd.SelectObject acReport, strReportName, True
DoCmd.PrintOut acPages, 1, 1
End Function
' ثم على زر الطباعة بالفورم
Private Sub CmdPrint_Click()
Baba(Report_Name)
End Sub
لماذا لم ترد على البرنامج الذي أرسلته لك بالمشاركة السابقه ؟؟؟؟؟؟؟؟؟؟؟؟ !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!