اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

باستخدام احد الأكواد التالية يمكنك تصدير جدولين  إلى ملف اكسيل واحد كل جدول في ورقة

 

حيث 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   يمكنك تغييره كما تحب

  • Like 1

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information