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

استيراد واضافة ملف CSV الى جدول معيد


saffar

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

52 دقائق مضت, saffar said:

مثال هذا الملف يقبل استيراد xls لكن لا يتعرف على csv

ثانية المفروض يضيف البيانات على الجدول الرئيسي append 

ImportExcel.rar 22.36 kB · 3 downloads

للعلم فى  مشكلة فى ملفات الاكسل تبعك

استبدل الكود على زر الامر الخاص بالإستيرد بالكود الاتى


On Error GoTo Err_MyProc

    Dim strTable As String
    Dim FSO As New FileSystemObject
    
    If Nz(Me.txtFileName, "") = "" Then
        MsgBox "Please select a file!"
        Exit Sub
    End If
    
    If FSO.FileExists(Nz(Me.txtFileName, "")) Then
        
        strTable = "tblJudy" 'Table Name
        DoCmd.DeleteObject acTable, strTable
        DoCmd.TransferText acImportDelim, , strTable, FSO.GetFileName(Me.txtFileName), True
        MsgBox "Transfer Complete!"

    Else
        MsgBox "File not found!"
    End If

Err_MyProc:
        'Error handler here.
        Resume Next

 

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

2 دقائق مضت, saffar said:

ملفك شغال لكنك استبدلت الجدول الموجود في المرفقات

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

وهي عبارة عن ملفات حضور Teams 

لاستخراج غياب الطلبة

غير كما تشاء الملف والكود ملك يمينك :fff:

هل تمت الاجابة على سؤالك على الوجه الذى تريده ؟!

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

35 دقائق مضت, saffar said:

قصدي انك انت استبدلت الجدول 

حضرتك استبدل فى الكود الجزء ده 

tblJudy

بالاسم اللى انت عاوزه

انظر اسم الجدول فى الكود ممكن تغيره من مكان التظليل بالصورة

003.jpg.59a97442cea871f69241f4d02ee9bbc4.jpg

لو مش عارف قول لى اسم الجدول زى ما انت عاوزه وانا اعمله لحضرتك

 

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

39 دقائق مضت, ابا جودى said:

حضرتك استبدل فى الكود الجزء ده 


tblJudy

بالاسم اللى انت عاوزه

انظر اسم الجدول فى الكود ممكن تغيره من مكان التظليل بالصورة

003.jpg.59a97442cea871f69241f4d02ee9bbc4.jpg

لو مش عارف قول لى اسم الجدول زى ما انت عاوزه وانا اعمله لحضرتك

 

أخي @ابا جودى 

** الملف الذي ارفقه الأخ السائل مكون من عدة أعمدة . 

** الأمر الآخر ماذا لو كان عنده أكثر من ملف هل يظل يغير اسم الجدول في كل مرة في الكود ؟؟ 

 

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

1 دقيقه مضت, فايز.. said:

أخي @ابا جودى 

** الملف الذي ارفقه الأخ السائل مكون من عدة أعمدة . 

** الأمر الآخر ماذا لو كان عنده أكثر من ملف هل يظل يغير اسم الجدول في كل مرة في الكود ؟؟ 

 

لا كل مره بيتم حذف الجدول اولا 

DoCmd.DeleteObject acTable, strTable

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

DoCmd.TransferText acImportDelim, , strTable, FSO.GetFileName(Me.txtFileName), True

 

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

اشكر سعة صدرك اخي ابا جودي

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

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

اسم الجدول في قاعدو البيانات meetingAttendanceList

 

اسماء الملفات قد تكون 

meetingAttendanceList1

meetingAttendanceList2

 

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

منذ ساعه, saffar said:

اشكر سعة صدرك اخي ابا جودي

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

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

اسم الجدول في قاعدو البيانات meetingAttendanceList

 

اسماء الملفات قد تكون 

meetingAttendanceList1

meetingAttendanceList2

 

طيب انا اسف تقريبا انا ما قدرت افهم الموضوع

جرب المرفق الاتى ان شاء الله يكون تمام

 

ImportExcel 3.zip

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

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

 

وهذا شغل اخوي ابا جودي ، بس يأخذ اكثر من ملف دفعة واحدة (يعني تقدر تختار مجموعة ملفات ، ثم تضيف مجموعة اخرى الى القائمة ، دفعة واحدة) 🙂

تقدر بالفأرة تختار اكثر من ملف ، او عند طريق الضغط على الزر shift او ctrl اثناء النقر على اسماء الملفات 🙂

 

جعفر

ImportExcel.accdb

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

وبدون لمس البرنامج ، وبعد استيراد البيانات الى الجدول meetingAttendanceList ،

نعمل استعلام ليكون مصدر بيانات للتقرير ، في هذا الاستعلام نفكك الحقل TimesStamp الى حقل تاريخ D1 وحقل وقت T1 (يعني حقول تاريخ وليس حقول نص) ، وبعدها يمكنك عمل ما تشاء في جمعهما 🙂

image.png.9aa929b8f02c02f41ea770fab4e4fe2d.png

.

image.png.7accb9c915da0bcdd02f6d315d022339.png

.

جعفر

 

1279.ImportExcel.accdb.zip

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

  • 2 weeks later...

مشكلة شنو انت طلبت استيراد من ملف الى  csv  الى جدول 

اعتقد ان العملية تمت بنجاح 

اذا بدك شئ تانى فضلا وكرما افتح موضوع جديد 

كل موضوع يخص سؤال واحد فقط 

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

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

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

 

19 دقائق مضت, ابا جودى said:

اعتقد ان العملية تمت بنجاح

كلامك صحيح ، وبقي لما يستورد الملف ، تنسيق timestamp عبارة عن نص ، ويحتاج الى تنسيق اخير 🙂

 

27 دقائق مضت, saffar said:

الى الان لم استطع حل المشكلة 

تقريبا انتهيت من الطلب ، فاعطني بعض الوقت 🙂

 

جعفر

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

36 دقائق مضت, jjafferr said:

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

 

كلامك صحيح ، وبقي لما يستورد الملف ، تنسيق timestamp عبارة عن نص ، ويحتاج الى تنسيق اخير 🙂

 

تقريبا انتهيت من الطلب ، فاعطني بعض الوقت 🙂

 

جعفر

الموضوع سهل جدا

انشاء جدول بالتنسيقات التى يريدها واستعلام الحاق من الجدول  timestamp الى الجدول الاخر !

ولكن يا حبذا لو فتح اخونا الجبيب موضوع جديد لسؤاله الجديد ان لم يستطع التنفيذ  :rol:

فقط من باب المصلحة العامة

  • 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