كيف يمكن دمج أو استيراد عدة ملفات CSV إلى أوراق عمل منفصلة؟
إذا كنت ترغب في استيراد عدة ملفات CSV من مجلد كأوراق عمل منفصلة داخل مصنف واحد، فكيف يمكنك تنفيذ هذه المهمة في Excel؟
استيراد عدة ملفات CSV إلى أوراق عمل منفصلة باستخدام كود VBA
استيراد عدة ملفات CSV إلى أوراق عمل منفصلة باستخدام Kutools لـ Excel
تقسيم مصنف إلى عدة ملفات CSV / PDF / TXT / ملفات Excel منفصلة
استيراد عدة ملفات CSV إلى أوراق عمل منفصلة باستخدام كود VBA
لاستيراد عدة ملفات CSV بسرعة إلى مصنف، قد يساعدك كود VBA التالي؛ يُرجى اتباع الخطوات التالية:
1. اضغط مع الاستمرار على مفتاحَيALT + F11 في Excel لفتح نافذةMicrosoft Visual Basic for Applications.
2. انقر فوقإدراج > وحدة نمطية (Module)، ثم الصق الكود التالي في نافذةالوحدة النمطية (Module).
كود VBA: استيراد عدة ملفات ملف نصي إلى أوراق عمل منفصلة:
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، كما في لقطة الشاشة:
4. ثم انقر على زرفتح (Open)، وسيتم استيراد ملفات CSV المحددة كأوراق عمل منفصلة داخل مصنف جديد.
5. وأخيرًا، يمكنك حفظ ورقة العمل الجديدة بالشكل الذي تحتاجه.
استيراد عدة ملفات CSV إلى أوراق عمل منفصلة باستخدام Kutools لـ Excel
إذا كنت تمتلكKutools لـ Excel، فيمكنك بفضل أداة الدمج القوية الخاصة به – دمج (Combine) – دمج عدة ملفات CSV أو استيرادها بسرعة إلى ورقة عمل واحدة أو إلى أوراق عمل منفصلة حسب احتياجاتك.
بعد تثبيتKutools لـ Excel، يُرجى اتباع ما يلي:
1. يُرجى النقر فوقKUTOOLS PLUS > دمج (Combine)، كما في لقطة الشاشة:
2.في مربع حوارتجميع ورقات العمل، يرجى التحديدنسخ ورقات العمل من عدة مصنفات إلى مصنف واحد، كما في لقطة الشاشة:
3. فيالخطوة 2من المعالج، انقر فوقإضافة (Add) > ملف (File)لاختيار ملفات CSV التي تريد دمجها، كما في لقطة الشاشة:
4. في مربع الحوار المنبثقفتح (Open)، حدد(*.csv) من القائمة المنسدلة، ثم اختر ملفات CSV التي تريد دمجها.
5. بعد ذلك، انقر فوق زرفتح (Open)، وستُستورد ملفات CSV المحددة إلى مربع الحوار، كما في لقطة الشاشة:
6. فيالخطوة 3، يُرجى تنفيذ العمليات التالية:
(1.) تحديد خانةفي الصف الأول من كل ورقة عمل (كتعليقات)من قسمإضافة معلومات الورقة العمل، وسيتم إدراج معلومات جميع ملفات CSV كتعليقات في الأوراق المدمجة؛
(2.) يمكنك إعادة تسمية ملفات CSV حسب رغبتك؛
(3.) يمكنك تجاوز ملفات CSV الفارغة عند مواجهتها.
7. بعد الانتهاء من عملية الدمج، انقر فوق زرإنهاء (Finish)، ثم حدد اسم ملف وموقعًا لمصنفك الجديد المدمج. انظر لقطة الشاشة:
8. بعد ذلك، انقر فوق زرحفظ (Save). في مربع التنبيه المنبثق، يمكنك فتح الملف المولَّد بالنقر فوقنعم (Yes)، أو إغلاقه بالنقر فوقلا (No)، كما في لقطة الشاشة:
9. بعد ذلك، يمكنك حفظ هذا السيناريو أو عدم حفظه حسب رغبتك. انظر لقطة الشاشة:
10. وأخيرًا، تم استيراد ملفات CSV المحددة إلى ورقة عمل جديدة، كلٌّ في ورقة منفصلة، كما في لقطة الشاشة:
نزّل Kutools لـ Excel وجربه مجانًا الآن!
تقسيم مصنف إلى عدة ملفات CSV / PDF / TXT / ملفات Excel منفصلة
في بعض الحالات، قد ترغب في تقسيم مصنف إلى ملفات CSV منفصلة، ويمكنك الاعتماد على أداة Kutools لـ Excel لإنجاز هذه المهمة بسرعة وسهولة.
بعد تثبيتKutools لـ Excel، يُرجى اتباع ما يلي:
1. انقر فوقKUTOOLS PLUS > مصنف (Workbook) > فصل المصنف، كما في لقطة الشاشة:
2.في مربع حوارفصل المصنف:
(1.) حدد الأوراق التي تريد تقسيمها؛
(2.) وحدد خانةتحديد صيغة الحفظ(Specify save format)، ثم اختر الصيغة نوع الملف التي تريد الحفظ بها؛
(3.) بعد ذلك، انقر فوق زرتقسيم (Split)، ثم حدد مجلدًا لحفظ الملفات المنفصلة فيه.
3. بعد ذلك، انقر فوق زرموافق (OK)لبدء عملية التقسيم، وسيتم تقسيم المصنف إلى ملفات CSV منفصلة حسب حاجتك.
نزّل Kutools لـ Excel وجربه مجانًا الآن!
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل