انتقل إلى المحتوى الرئيسي
 

كيفية دمج / استيراد ملفات CSV متعددة في أوراق عمل متعددة؟

المؤلف: شياويانغ آخر تعديل: 2024-09-14

إذا كنت تريد استيراد ملفات csv متعددة من مجلد كأوراق عمل منفصلة داخل مصنف ، فكيف يمكنك التعامل مع هذه المهمة في Excel؟

استيراد ملفات csv متعددة في أوراق عمل منفصلة برمز VBA

قم باستيراد ملفات CSV متعددة في أوراق عمل منفصلة باستخدام Kutools for Excel

قم بتقسيم مصنف إلى عدة ملفات csv / pdf / txt / excel منفصلة


استيراد ملفات csv متعددة في أوراق عمل منفصلة برمز VBA

لاستيراد ملفات csv متعددة بسرعة إلى مصنف ، قد تفيدك التعليمات البرمجية لـ VBA التالية ، يرجى القيام بما يلي:

1. اضغط باستمرار على ALT + F11 في Excel لفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. انقر إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة او شباك.

كود فبا: استيراد ملفات نصية متعددة لفصل أوراق العمل:

Sub CombineCsvFiles()
'updateby Extendoffice
    Dim xFilesToOpen As Variant
    Dim I As Integer
    Dim xWb As Workbook
    Dim xTempWb As Workbook
    Dim xDelimiter As String
    Dim xScreen As Boolean
    On Error GoTo ErrHandler
    xScreen = Application.ScreenUpdating
    Application.ScreenUpdating = False
    xDelimiter = "|"
    xFilesToOpen = Application.GetOpenFilename("Text Files (*.csv), *.csv", , "Kutools for Excel", , True)
    If TypeName(xFilesToOpen) = "Boolean" Then
        MsgBox "No files were selected", , "Kutools for Excel"
        GoTo ExitHandler
    End If
    I = 1
    Set xTempWb = Workbooks.Open(xFilesToOpen(I))
    xTempWb.Sheets(1).Copy
    Set xWb = Application.ActiveWorkbook
    xTempWb.Close False
    Do While I < UBound(xFilesToOpen)
        I = I + 1
        Set xTempWb = Workbooks.Open(xFilesToOpen(I))
        xTempWb.Sheets(1).Move , xWb.Sheets(xWb.Sheets.Count)
    Loop
ExitHandler:
    Application.ScreenUpdating = xScreen
    Set xWb = Nothing
    Set xTempWb = Nothing
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
    Resume ExitHandler
End Sub

3. ثم اضغط F5 مفتاح لتنفيذ هذا الرمز ، وستظهر نافذة ، انتقل إلى المجلد المحدد وحدد ملفات csv التي تريد استيرادها إلى Excel ، انظر الصورة:

قم بتشغيل كود vba لتحديد ملفات csv

4. ثم انقر فوق ساعات العمل ، فقد تم استيراد ملفات CSV المحددة كأوراق عمل منفصلة داخل مصنف جديد.

5. أخيرًا ، يمكنك حفظ المصنف الجديد حسب حاجتك.


قم باستيراد ملفات CSV متعددة في أوراق عمل منفصلة باستخدام Kutools for Excel

إذا كان لديك كوتولس ل إكسيلبأداتها القوية-دمج، يمكنك دمج ملفات CSV متعددة أو استيرادها بسرعة في ورقة عمل واحدة أو عدة أوراق عمل منفصلة حسب حاجتك.

كوتولس ل إكسيل يقدم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة وتعزيز الإبداع والكفاءة. معزز بقدرات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات سهلة. معلومات تفصيلية عن Kutools لـ Excel...         تجربة مجانية...

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:

1. من فضلك اضغط كوتولس بلس > دمج، انظر لقطة الشاشة:

انقر فوق الجمع بين ميزة kutools

2. في مجلة اجمع أوراق العمل مربع الحوار ، الرجاء التحديد اجمع أوراق عمل متعددة من مصنفات في مصنف واحد، انظر لقطة الشاشة:

حدد خيار دمج أوراق عمل متعددة من المصنفات في مصنف واحد

3. في الخطوة الثالثة المعالج ، انقر فوق أضف > قم بتقديم لاختيار ملفات csv التي تريد دمجها ، انظر الصورة:

أضف > ملف لاختيار ملفات csv التي تريد دمجها

4. في خرجت ساعات العمل الحوار، حدد (* CSV.) من القائمة المنسدلة ، ثم حدد ملفات csv التي تريد دمجها.

حدد ملفات csv التي تريد دمجها في النافذة المفتوحة

5. ثم اضغط ساعات العمل زر ، وتم استيراد ملفات csv المحددة في مربع الحوار ، انظر الصورة:

تم استيراد ملفات csv المحددة إلى مربع الحوار

6. في الخطوة الثالثةيرجى القيام بالعمليات التالية:

(1.) تدقيق الصف الأول من كل ورقة عمل (تعليقات) من أدخل معلومات ورقة العمل في القسم ، سيتم إدراج جميع معلومات ملفات csv في الأوراق المدمجة كتعليقات ؛

(2.) يمكنك إعادة تسمية ملفات csv حسب حاجتك ؛

(3.) يمكنك تخطي ملفات csv الفارغة عندما تصادف ملف csv فارغ.

تعيين الخيارات في مربع الحوار

7. ثم اضغط نهاية وبعد الانتهاء من عملية الجمع، يمكنك تحديد اسم الملف وموقع المصنف الجديد الذي تم جمعه. انظر لقطة الشاشة:

حدد اسم الملف وموقع المصنف المدمج الجديد الخاص بك

8. ثم اضغط حفظ زر ، في مربع برومت المنبثق ، يمكنك فتح انقر فوق الملف الجديد نعم، وأغلقه بالنقر لا، انظر لقطة الشاشة:

افتح الملف الجديد وانقر فوق نعم، وأغلقه بالنقر فوق لا

9. وبعد ذلك يمكنك حفظ هذا السيناريو أم لا كما تريد. انظر لقطة الشاشة:

احفظ هذا السيناريو أو لا

10. أخيرًا ، تم استيراد ملفات csv المحددة إلى مصنف جديد بورقة عمل منفصلة ، انظر الصورة:

تم استيراد ملفات csv المحددة إلى مصنف جديد

قم بتنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!


قم بتقسيم مصنف إلى عدة ملفات csv / pdf / txt / excel منفصلة

في حالة معينة ، قد ترغب في تقسيم مصنف إلى ملفات csv منفصلة ، يمكن لأداة Kutools for Excel's Split Workbook إنهاء هذه المهمة بسرعة وسهولة.

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:

1. انقر كوتولس بلس > مصنف > انقسام وركبوك، انظر لقطة الشاشة:

انقر فوق ميزة "تقسيم المصنف" في kutools

2. في مجلة انقسام وركبوك صندوق المحادثة:

(1.) تحقق من أوراق العمل التي تريد تقسيمها ؛

(2.) وتحقق حدد حفظشكل، ثم اختر تنسيق الملف الذي تريد حفظه ؛

(3.) ثم انقر فوق الانقسام زر ، وحدد مجلد لوضع الملفات المنفصلة.

حدد الخيارات في مربع الحوار تقسيم المصنف

3. ثم انقر فوق OK لبدء التقسيم ، سيتم تقسيم المصنف إلى ملفات csv منفصلة تحتاجها.

سيتم تقسيم المصنف إلى ملفات csv منفصلة

قم بتنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!

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

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!