مشكلة في استيراد البيانات

[waheidi2005]

الخبراء الافاضل ،،، السلام عليكم

في الملف المرفق عندما اعمل تصدير لجدول الموظفين يتم تصديره بدون مشاكل والتسميات تظهر باللغة العربية ولكن عندما اقوم باستيراد البيانات فانه يظهر رسالة ( حقل رقم الموظف غير موجود في الملف الوجهة) وانا اريد ان استورد البيانات بنفس الاسماء التوضيحية علما باني قمت بتغييرها الى اللغة الانجليزية فتم استيرادها دون مشاكل هل هناك طريقة لاستيرادها كما هي باللغة العربية

 

مع الشكر

مثال.accdbFetching info...

[محمد أبوعبدالله]

وعليكم السلام ورحمة الله وبركاته

لانك تريد استيراد جدول employee وهو موجود اساساً

اذا كنت تريد استيراد البيانات فقط قم بعمل ربط لملف اكسيل ثم قم بعمل استعلام  الحاق

اما اذا كنت تريد حذف الجدول القديم واستيراد الجدول الجديد نفذ الامر التالي

DoCmd.DeleteObject acTable, "employee"

تحياتي

[waheidi2005]

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

 

ولك كل الاحترام

[محمد أبوعبدالله]

  في 21‏/12‏/2019 at 05:25, waheidi2005 said:

ولكن هل من الممكن ان توضح لي كيف اربط ملف اكسل

Expand  

تفضل اخي الكريم

     Dim excelFilePath As String
        excelFilePath = CurrentProject.Path & "\" & "employee.xlsx"
        ' حذف الجدول القديم
        DoCmd.DeleteObject acTable, "employee"
        ' استيراد الجدول الجديد
        DoCmd.TransferSpreadsheet acLink, acSpreadsheetTypeExcel16, "employee", excelFilePath, True

 

ملاحظة : acSpreadsheetTypeExcel16 يتغير حسب اصدار الاوفيس لديك

  في 21‏/12‏/2019 at 05:25, waheidi2005 said:

واقوم بعمل استعلام الحاقي

Expand  

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

تحياتي

[waheidi2005]

جزاك الله كل خير اخي محمد ونفع الله بك وغفر لنا ولك

[محمد أبوعبدالله]

  في 21‏/12‏/2019 at 05:42, waheidi2005 said:

جزاك الله كل خير اخي محمد ونفع الله بك وغفر لنا ولك

Expand  

بالتوفيق اخي الكريم

تحياتي

[jjafferr]

السلام عليكم 🙂

 

هنا كانت نفس المشكلة 

 

 

جعفر

[waheidi2005]

اشكرك اخي جعفر تم حل المشكلة بمساعدة الاخ الفاضل محمد ابو عبد الله

جزاكم الله كل خير

[jjafferr]

نعم انا متابع مجهود احوي محمد ابوعبدالله ، ولكني اردت المشاركة بطريقة اخرى للحل 🙂

 

جعفر

[أبوبسمله]

جزاكم الله خيرا اساتذتى وفقكم الله لما يحبه ويرضاه

[waheidi2005]

الشكر لله اولا ومن ثم لكم اخوتنا واستاتذتنا الفاضلين على جهودكم المميزة في مساعدتنا وجعلها الله في ميزان حسناتكم