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

المساعدة فى - تصدير جدول الى ملف اكسيل ثم استيراد ما به من بيانات الى نفس الجدول


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

السلام عليكم

الرجاء المساعدة فى ما يلى 

لدي جدول باسم Tp_stoudnt

ارغب فى ما يلى 

 1- تصدير بعض الاعمدة من الجدول الى ملف اكسيل يكون بجوار قاعدة البيانات الحالية

لكى يتم تعبئة بياناته من ملفات اكسيل مستورة من موقع الحكومة الالكترونية

2 - يتم استيراد البيانت من ملف الاكسيل الى نفس الجدول بالقاعدة 

لانه عند لصق البيانات فى الجدول مباشرة لا تعمل 

stu- up.rar

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

ارغب فى ان يكون هناك زر فى الفورم لانشاء ملف الاكسيل بجوار القاعده

وبعد زلك يكون هناك زر للاستيراد

انظر الفورم المرفق بالقاعدة

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

أشعر بشيء من عدم ترتيب الأفكار

1 ساعه مضت, محمد قاسم 12 said:

1- تصدير بعض الاعمدة من الجدول الى ملف اكسيل

مادام الأمر به انتقاء لبعض الأعمدة لتصديرها وبعض الأعمدة لا تصدر فيجب إنشاء استعلام ثم تصدير هذا الاستعلام

1 ساعه مضت, محمد قاسم 12 said:

2 - يتم استيراد البيانت من ملف الاكسيل الى نفس الجدول

ماذا عن البيانات الموجودة في الجدول . هل يتم حذفها أم الإضافة عليها وتكرار السجلات

وإذا تم حذفها ماذا عن الأعمدة التي لم يتم تصديرها. هل تظل فارغة بدون بيانات ؟

رجاء توضيح المطلوب بكل تفاصيله وأهدافه

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

37 دقائق مضت, أ / محمد صالح said:

مادام الأمر به انتقاء لبعض الأعمدة لتصديرها وبعض الأعمدة لا تصدر فيجب إنشاء استعلام ثم تصدير هذا الاستعلام

بارك الله فيك يا استاذنا

هناك جدول باسم جدول Tp_stoudntoutبه الأعمدة التي ترغب في تصديرها في الاكسيل

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

40 دقائق مضت, أ / محمد صالح said:

ماذا عن البيانات الموجودة في الجدول . هل يتم حذفها أم الإضافة عليها وتكرار السجلات

وإذا تم حذفها ماذا عن الأعمدة التي لم يتم تصديرها. هل تظل فارغة بدون بيانات ؟

رجاء توضيح المطلوب بكل تفاصيله وأهدافه

الهدف هو ادراج سجلات جديده للقاعده

انظر الفورم والمرفق في الملف

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

يمكنك استعمال هذه الأكواد

كود تصدير الاستعلام إلى اكسل في نفس مجلد البرنامج

DoCmd.OutputTo acOutputQuery, "QueryName", acFormatXLSX, CurrentProject.Path & "\ExcelFileName.xlsx", False

مع مراعاة تغيير اسم الاستعلام queryname واسم ملف الاكسل excelfilename

كود الاستيراد من اكسل إلى جدول

DoCmd.TransferSpreadsheet acImport, 8, "TableName", CurrentProject.Path & "\ExcelFileName.xlsx", True

مع مراعاة تغيير اسم الجدول وملف الاكسل ومراعاة تطابق أسماء الأعمدة (وليست التسمية caption) في الجدول مع خلايا الصف الأول في ملف الاكسل وطبعا عدم تكرار قيم حقل المفتاح الأساسي ومعرفة أن الأعمدة التي لم يتم استيرادها ستكون فارغة

بالتوفيق 

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

كود التصدير نجح بالفعل

والمشكلة فى كود الاستيراد

استاذى الفاضل

المشكله هنا اننى ارغب فى ان يتم الاستيراد واضاة اسم المدرسة واسم الصف من الفورم مع البيانات المضافة 

1533709746_.JPG.cbd0e3027f0ae75fa669b7c931c601fe.JPG

 

وهناك جدول باسم Tp_stoudnt-OUT

معد لتصديره وذلك تجنبا لوجود اى بيانات فى الجدول المخرج من القاعدة

 

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

بالنسبة لموضوع إضافة حقل المدرسة والفصل لملف الاكسل

يمكنك استعمال هذا الكود قبل كود الاستيراد

'Tools ->References -> Microsoft Excel Object Library
Dim xlapp As Excel.Application, xlBook As Excel.Workbook, xlSheet As Excel.Worksheet
Dim ExcelPath As String, lastRow As Long, lastcolumn As Long

ExcelPath = CurrentProject.Path & "\ExcelFileName.xlsx"
Set xlapp = CreateObject("Excel.Application")
Set xlBook = xlapp.Workbooks.Open(ExcelPath)
Set xlSheet = xlBook.Worksheets(1)

With xlSheet
    lastRow = .Cells(.Rows.Count, "B").End(xlUp).Row
    lastcolumn = .Cells(1, .Columns.Count).End(xlToLeft).Column
    .Cells(1, lastcolumn + 1) = "school field title"
    .Range(.Cells(2, lastcolumn + 1), .Cells(lastRow, lastcolumn + 1)) = "school field value"
    .Cells(1, lastcolumn + 2) = "class field title"
    .Range(.Cells(2, lastcolumn + 2), .Cells(lastRow, lastcolumn + 2)) = "class field value"
End With

xlBook.Close 1
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlapp = Nothing

مع مراعاة تفعيل مرجع اكسل من قائمة tools وتغيير اسم ملف الاكسل

واسم عنوان حقل المدرسة وقيمة حقل المدرسة

واسم عنوان حقل الفصل وقيمة حقل الفصل

بالتوفيق

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

منذ ساعه, د.كاف يار said:

تفضل هذا التعديل

 

استاذ الفاضل والمعلم الجليل

الف شكر لكم

بالفعل يتم انشاء ملف الاكسل

ولكن لا يتم استيرد البيانات من الملف مره اخرة

اسف جدا علىعدم قدرتى على ايصال طلبي

انظر الفورم بعد التعديل عليه

 

1.PNG.7fb7dd9dc83306e8f3e8ec672fb944bb.PNG

ارغب فى لصق البيانات هنا لتأخذ معها الصف واسم المدرسة  وتدرج فى جدول Tp_stoudnt 

اما بالنسبة لتصدير البيانات ارغب فى ن يكون التصدير من جدول Tp_stoudnt-OUT

وهذه تم تعديل ويتم الاخراج بنجاح

الفشل هنا فى استيراد البيانات مره اخرى

ExcelFiles.rar

هذا ملف الاكسل وقد تم تعبئة بالبيانات

stu- up.accdb

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

لديك مشكلة في ملف الاكسل 

حقول يجب الا تكون فارغة

- RakamKomy

- csles

- school

 

لقد وضعت تسلسل في dyana مما تسبب في مشكلة في الاستيراد

 

تفضل التعديل

 

stu- up2.zip

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

السلام عليكم

اولا : اعتذر بشده عن ازعاجي لكم

واسف لانى لم استطع التطبيق جيدا لما قمتم به من تعديل

-------------------------

عند تجربة الملف تأتى الرسائل التالية

19118577_1.PNG.c54d58d99f7602e2372d39730014a05a.PNG19118577_1.PNG.c54d58d99f7602e2372d39730014a05a.PNG

و قد اشارت اليكم بان المطلوب ان يتم الاستيراد الى اسم المدرسة والصف المحددين فى الفورم

csles

- school

تأخذ بياناتهم من الفورم

وتضاف مع البيانات الى جدول  Tpstoudnt 

الخطاء رقم 2.PNG

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

43 دقائق مضت, محمد قاسم 12 said:

السلام عليكم

اولا : اعتذر بشده عن ازعاجي لكم

واسف لانى لم استطع التطبيق جيدا لما قمتم به من تعديل

-------------------------

عند تجربة الملف تأتى الرسائل التالية

19118577_1.PNG.c54d58d99f7602e2372d39730014a05a.PNG19118577_1.PNG.c54d58d99f7602e2372d39730014a05a.PNG

و قد اشارت اليكم بان المطلوب ان يتم الاستيراد الى اسم المدرسة والصف المحددين فى الفورم

csles

- school

تأخذ بياناتهم من الفورم

وتضاف مع البيانات الى جدول  Tpstoudnt 

الخطاء رقم 2.PNG

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

جرب استخدم نفس الملف المرفق مع التعديل

هذه الصورة بعد تعديل ملف الاكسل بما يتوافق مع بنية الجداول لديك

image.png.c797fa5e6a0fd21b7f5c3cf6964d4166.png

 

Tp_stoudnt.xlsx

تم تعديل بواسطه د.كاف يار
رابط هذا التعليق
شارك

يبدوا لى ان الخطاء لدي فى تصميم القاعدة

لانه لم تنجح

هل هناك طرق اخرى

هذا ملف به بيانات صحيحة ارجوا التجربة وقد يكون الخطاء فى الجهاز لدي 

Tp_stoudnt بيانات صحيحة.rar

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

تفضل هذا ملفك بعد وضع الكود فيه (أولى خطوات التعلم هي الرغبة والإصرار)

مع ضرورة أن يكون عنصر المدرسة والفصل غير منضم  (لانهما مرتبطان بجدول الطلاب فبمجرد اختيارهم يعني أنك بدأت تسجل سجل جيديد)

بالتوفيق

mas_import_export.rar

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

19 ساعات مضت, د.كاف يار said:

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

يجب ان تستخرج الملفات من الملف المضغوط اولاً

بارك الله فيكم لا اعلم لماذا لا يعمل لدى 350545885_1-1.JPG.cc4d52042dcc7e6e5ae7686dc1da7b06.JPG2222.PNG.7b99f69a0b9a3db50d8d9c80fa9cf05e.PNG

5 ساعات مضت, أ / محمد صالح said:

تفضل هذا ملفك بعد وضع الكود فيه (أولى خطوات التعلم هي الرغبة والإصرار)

مع ضرورة أن يكون عنصر المدرسة والفصل غير منضم  (لانهما مرتبطان بجدول الطلاب فبمجرد اختيارهم يعني أنك بدأت تسجل سجل جيديد)

بالتوفيق

استاذس الفاضل 

بارك الله فيكم

هذا بالفعل ما كنت ارغب به 

ولكن فيما يبدوا لدي مشكله فى الاوفيس 

انظر هذه الرسالة mas.JPG.afd48b5a878114ceee374db23c79e38d.JPG

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

لا يوجد مشكلة في الأوفيس

يوجد فقط عدم التزام بالتعليمات

في ٢٨‏/٨‏/٢٠٢١ at 13:50, أ / محمد صالح said:

مع مراعاة تفعيل مرجع اكسل من قائمة tools

والخطوات بالتفصيل في السطر الأخضر فوق سطر الخطأ (في حالة نسخ النموذج إلى قاعدة بيانات أخرى )

بالتوفيق 

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

سؤال مبدئي

هل الملف المرفق مني يعمل بكفاءة عندك قبل أي تعديل عليه؟

نأتي لظهور الأخطاء 

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

حتى نتوصل لسبب الخطأ 

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

مادام الملف يعمل عندي يفترض أن يعمل عندك بدون إضافة مراجع فقد تمت إضافة المرجع عندي

وإذا كنت لم تقم بأي تغيرات

هل يظهر لك في نافذة المراجع في قائمة أدوات مرجع مفقود missing reference ؟ يخص ميكروسوفت اكسل (16) وهو رقم اكسل 365

إذا كان يظهر يجب حذف علامة الصح بجواره 

لأن الرسالة السابقة تعني تعارض في تسمية الموديول أو المشروع أو المرجع

بالتوفيق 

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

انصحك بأن تقوم بإلغاء جميع العلاقات فلست بحاجة للكم الهائل من هذه العلاقات 

حرر الجدول من جميع القيود و ستجده يتجاوب معك

 

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

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