المحتوى
يمكن أن يؤدي إنشاء ورقة عمل Excel في Access إلى توفير الوقت عندما تحتاج إلى تصدير البيانات إلى ورقة عمل Excel. يمكن أن يكون Visual Basic for Applications (VBA) أداة فعالة لأتمتة العمليات في تطبيقات Microsoft Office. باستخدام VBA ، يمكنك استخدام كائن تطبيق Microsoft Excel لإنشاء جدول بيانات Excel من Access. كائن Excel هو نقطة البداية لبقية طراز الكائن. تصدير البيانات إلى Excel بشكل أسرع عن طريق حفظ البيانات مباشرة إلى ورقة عمل Excel.
الاتجاهات
-
قم بتشغيل Microsoft Office Access ، وانقر فوق "قاعدة بيانات فارغة" ، وانقر فوق الزر "إنشاء" لإنشاء قاعدة بيانات فارغة. انقر فوق علامة التبويب "أدوات قاعدة البيانات" وانقر فوق "Visual Basic" لفتح نافذة Microsoft Visual Basic. انقر فوق قائمة "إدراج" وانقر فوق "وحدة نمطية" لإدراج رمز وحدة نمطية جديد.
-
انقر على قائمة "أدوات" وانقر على "المراجع". اسحب ثم حدد المربع بجوار "Microsoft Excel
مكتبة الكائنات "(مكتبة كائنات Microsoft Excel). انقر فوق "موافق". -
ابدأ بكتابة التعليمات البرمجية التالية في VBA لإنشاء إجراء فرعي جديد:
خاص sub createSpreadSheet ()
-
تابع كتابة التعليمة البرمجية التالية لإنشاء ثلاثة متغيرات كائن جديدة سيتم استخدامها لإنشاء ورقة عمل Excel:
Dim newExcelApp As Excel.Application Dim newWbk As Excel.Workbook Dim newWkSheet As Excel.Worksheet
-
أضف الكود التالي لتشغيل Excel وعرضه:
قم بتعيين newExcelApp = Excel.Application newExcelApp.Visible = صواب
-
أدخل الرمز التالي لإضافة مصنف جديد وورقة عمل جديدة:
تعيين newWbk = newExcelApp.Workbooks.Add تعيين newWkSheet = newWbk.Worksheets (1)
-
أضف البيانات إلى ورقة العمل الجديدة عن طريق كتابة التعليمات البرمجية التالية:
newWkSheet.Cells (1، 1) .Value = "ورقة عمل جديدة ..."
-
احفظ المصنف الجديد الذي تم إنشاؤه عن طريق إدخال الكود التالي:
newWkSheet.SaveAs ("C: myworksheet.xlsx")
-
قم بتحرير المسار في الخطوة السابقة وأدخل الدليل واسم الملف الذي تختاره.
-
أدخل الكود التالي لإنهاء الإجراء الفرعي:
نهاية الفرعية
-
اضغط على "F5" لتشغيل الإجراء وإنشاء ورقة عمل Excel جديدة.