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

Recommended Posts

السلام عليكم 

أريد استيراد البيانات المرفقة من ملف اكسل ..

ولك جزيل الشكر .. 

11.rar

شارك هذه المشاركه


رابط المشاركه
شارك
منذ ساعه, خالد سيسكو 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

شارك هذه المشاركه


رابط المشاركه
شارك

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 اعضاء متواجدين الان

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

×
×
  • اضف...