علي المصري قام بنشر يناير 2, 2015 قام بنشر يناير 2, 2015 باستخدام احد الأكواد التالية يمكنك تصدير جدولين إلى ملف اكسيل واحد كل جدول في ورقة حيث Table1 و Table2 هي اسماء الجداول DoCmd.OutputTo acOutputTable, "Table1", "ExcelWorkbook(*.xlsx)", "", False, "", , acExportQualityPrint DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, "Table2", "Table1.xlsx", True, sheet2 أو استخدم الكود التالي Dim Filepath As String Filepath = CurrentProject.Path & "\StudentData.xlsx" DoCmd.TransferSpreadsheet acExport, , "Table1", Filepath, True, sheet1 DoCmd.TransferSpreadsheet acExport, , "Table2, Filepath, True, sheet2 حيث أنه سوف يتم الحفظ في نفس مسار قاعدة البيانات باسم studentsData يمكنك تغييره كما تحب 1
ابو الآء قام بنشر يناير 3, 2015 قام بنشر يناير 3, 2015 بارك الله فيك استاذى الفاضل لو تكرمت علينا بمثال لاضافته للمكتبه
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.