كود VBA لتصدير بيانات Access إلى Excel

كود VBA لتصدير بيانات Access إلى Excel
جدول المحتويات

تصدير بيانات الوصول إلى Excel باستخدام VBA (مع الصور والتعليمات البرمجية)

ما هذا؟

يساعدك رمز VBA هذا على تصدير البيانات وصول الجدول إلى Excel بنقرة واحدة.

لماذا هو؟

يمكنك تحميل بيانات Access أو تصديرها إلى Excel دون فتح مصنف Excel.

كيفية تصدير بيانات الوصول إلى Excel

الخطوة 1: افتح قاعدة بيانات Access وانتقل إلى منشئ أكواد VBA (Alt + F11) وافتح وحدة نمطية جديدة.


تصدير بيانات الوصول إلى ExcelPin

الخطوة 2: انسخ الكود التالي وألصقه فيه.

				
					Sub ExportToXl() عند ظهور خطأ GoTo ErrorHandler Dim dbTable As String Dim xlWorksheetPath As String xlWorksheetPath = "C:\" 'أذكر مسار xlWorkbook xlWorksheetPath = xlWorksheetPath & "xlWorkbookName.xlsx" 'استبدل 'xlWorkbookName.xlsx' باسم المصنف الخاص بك dbTable = "tblMaster" 'استبدل 'tblMaster' بالجدول الموجود في قاعدة بيانات Access الذي تريد تصدير البيانات منه DoCmd.TransferSpreadsheet Transfertype:=acExport, Spreadsheettype:=acSpreadsheetTypeExcel12, tablename:=dbTable, FileName:=xlWorksheetPath, hasfieldnames:= صحيح ErrorHandlerExit: الخروج من Sub ErrorHandler: MsgBox "رقم الخطأ: " & Err.Number & "؛ الوصف: " & Err.Description استئناف ErrorHandlerExit End Sub
				
			

الخطوه 3: انقر فوق الزر "تشغيل" أو F5 أو زر "الأمر" الذي قمت بربط هذا الرمز به!

في حالة قيامك بتعيين الكود لزر أمر، تأكد من وجود الكود ضمن Private/Public Sub_Event(); شيء من هذا القبيل أدناه

تصدير فرعي خاصToXl_Click()

تصدير بيانات الوصول إلى Excel

تم تحميل سجلات قاعدة بيانات Access بنجاح إلى Excel، افتح مصنف Excel الخاص بك وتحقق من البيانات.

ملحوظة: تأكد من تمكين "مكتبة كائنات بيانات Microsoft ActiveX" من ملف أدوات - مراجع (استخدم أحدث إصدار [6.1 اعتبارًا من هذا المنشور]).

تصدير بيانات الوصول إلى Excel_AdodbPin

أنا متأكد من أنك تعمل على الكثير من بيانات Excel وMS Access وVBA، لذا فأنا بقوة أنصحك بالانضمام إلى نموذج مستخدم Ultimate Excel VBA أدناه مع قاعدة بيانات Access! إنه استثمار يستحق في نفسك! افعلها الآن!

قم ببناء برنامج العالم الحقيقي الخاص بك، وتعلم Excel الحقيقي VBA (وحدات الماكرو)، وتجاوز حدود Excel مع المشروع الكامل

أنسون أنتوني
أنسون أنتوني
أنسون هو مؤلف مساهم ومؤسس في www.askeygeek.com. لقد كان تعلم أي شيء جديد هو شغفه دائمًا، ASKEYGEEK.com هو نتيجة شغفه بالتكنولوجيا والأعمال. لقد حصل على عقد من الخبرة المتنوعة في الاستعانة بمصادر خارجية للعمليات التجارية، والمالية والمحاسبة، وتكنولوجيا المعلومات، والتميز التشغيلي وذكاء الأعمال. خلال فترة عمله، عمل في مؤسسات مثل Genpact وHewlett Packard وM*Modal وCapgemini في أدوار ومسؤوليات مختلفة. بعيدًا عن الأعمال والتكنولوجيا، فهو من عشاق الأفلام ويقضي ساعات معًا في مشاهدة وتعلم السينما وصانع أفلام أيضًا!

3 Responses

  1. أريد أن ألحق بجدول البيانات شهريا. يجب أن تذهب البيانات إلى تنسيق محدد. اعتقدت أن هناك أمرًا يحتوي على وسيطات الصف/العمود. تم استخدام مساحة عمل مرة واحدة للتنقل عبر السجلات التي تنتقل إلى عنوان الخلية. هل كنت أحلم؟ شكرًا

اترك تعليقاً

لن يتم نشر عنوان بريدك الإلكتروني. الحقول الإلزامية مشار إليها بـ *

تهانينا!
لقد فعلتها،
لا تغلق!
أدخل فرصتك للفوز 100,000 حرف من رصيد UberTTS
شكرا على الزيارة!

هذه النافذة المنبثقة لن تظهر متروك لكم مرة أخرى!!!

UberTTS 100K بيضة عيد الفصح
Share to...