اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

استيراد بيانات


عفرنس
إذهب إلى أفضل إجابة Solved by Barna,

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

منذ ساعه, خالد سيسكو said:

تفضل اخي العزيز

ملف لاحد الاخوة  في الموقع

اتمنى ان يكون المطلوب

Access Import_ up.rar 23.84 kB · 5 تنزيلات

لم يضبط معي .. 

لعلك أخي خالد رأيت بيانات ملف الإكسل المرفق .. أريدها تكون في الجدول حسب الخانات المحددة . ولك جزيل الشكر . 

رابط هذا التعليق
شارك

السلام عليكم 

أخي يجب أن تجري بعض التعديلات علي ملف الاكسل لتسهل معك عملية الاستيراد

أولا يجب أن تجعل كل قيمة بعمود مستقل 

ثانيا اجعل عنوين الاعمدة هي نفسها نفس الأسماء الأعمدة بالجدول المراد الاستيراد اليه بالأكسس

ثالثا اتبع تعليمات استيراد البيانات بمعالج الاستيراد الخاص بالأكسس

 

1234567.jpg

  • Like 1
رابط هذا التعليق
شارك

13 دقائق مضت, أبو عبدالله الحلوانى said:

السلام عليكم 

أخي يجب أن تجري بعض التعديلات علي ملف الاكسل لتسهل معك عملية الاستيراد

أولا يجب أن تجعل كل قيمة بعمود مستقل 

ثانيا اجعل عنوين الاعمدة هي نفسها نفس الأسماء الأعمدة بالجدول المراد الاستيراد اليه بالأكسس

ثالثا اتبع تعليمات استيراد البيانات بمعالج الاستيراد الخاص بالأكسس

 

1234567.jpg

لا أرغب هذه الطريقة .. جزيت خيرا . 

رابط هذا التعليق
شارك

اذا كنت تريد الاستيراد يتم من خلال الأكواد فلابد من اتباع الخطوتين الأوليين بالمشاركة السابقة

ثم استخدم الكود التالي

DoCmd.TransferSpreadsheet acImport, _
acSpreadsheetTypeExcel12, _        ' هنا تحدد رقم نسخة الاوفس لديك وفي الغالب ستجد النسخة تظهر لديك اتمتك عند كتابة الكود
"StUpdatInfo", _        ' هنا تحدد اسم الجدول المراد الاستيراد اليه 
Me.txtPath, _        'هنا تحدد مسار ملف الاكسل المراد استيراده  
True, _              'هذا الخيار تحدد فيه ان كان ملف الاكسل لديك يحتوي علي أسماء للأعمدة أم لا
"A1:Z10000"        'هنا تحدد نطاق البيانات داخل ملف الاكسل وهو اختياري ولكن أفضل تحديده بشكل شخصي حتي لا يتم استيراد حقول فارغة غير مرغوب بها

ولا تنسي الخطوتين الأوليين

تمنياتي بالتوفيق

  • Like 1
رابط هذا التعليق
شارك

11 دقائق مضت, أبو عبدالله الحلوانى said:

اذا كنت تريد الاستيراد يتم من خلال الأكواد فلابد من اتباع الخطوتين الأوليين بالمشاركة السابقة

ثم استخدم الكود التالي


DoCmd.TransferSpreadsheet acImport, _
acSpreadsheetTypeExcel12, _        ' هنا تحدد رقم نسخة الاوفس لديك وفي الغالب ستجد النسخة تظهر لديك اتمتك عند كتابة الكود
"StUpdatInfo", _        ' هنا تحدد اسم الجدول المراد الاستيراد اليه 
Me.txtPath, _        'هنا تحدد مسار ملف الاكسل المراد استيراده  
True, _              'هذا الخيار تحدد فيه ان كان ملف الاكسل لديك يحتوي علي أسماء للأعمدة أم لا
"A1:Z10000"        'هنا تحدد نطاق البيانات داخل ملف الاكسل وهو اختياري ولكن أفضل تحديده بشكل شخصي حتي لا يتم استيراد حقول فارغة غير مرغوب بها

ولا تنسي الخطوتين الأوليين

تمنياتي بالتوفيق

بورك فيك ابو عبدالله .. 

حقيقة انا لا أفهم طريقة الأكواد .. 

إن استطعت تعمله لي اكن لك شاكرا .. 

دمت بود 

رابط هذا التعليق
شارك

  • أفضل إجابة
2 ساعات مضت, emam1424 said:

بورك فيك ابو عبدالله .. 

حقيقة انا لا أفهم طريقة الأكواد .. 

إن استطعت تعمله لي اكن لك شاكرا .. 

دمت بود 

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

 

Database1.mdb

  • Like 4
رابط هذا التعليق
شارك

1 ساعه مضت, Barna said:

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

 

Database1.mdb 316 kB · 2 تنزيلات

جزاك الله خيرا أخي محمد . وجميع الأخوة .. 

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information