كيف يمكن جمع البيانات من أوراق متعددة في ورقة رئيسية واحدة في Excel؟
في بعض الأحيان، قد تحتاج إلى جمع البيانات من أوراق متعددة في ورقة رئيسية واحدة لدمجها أو تنفيذ عمليات أخرى، كما يظهر في لقطة الشاشة أدناه. لكن نسخ المحتويات ولصقها يدويًّا واحدة تلو الأخرى أمرٌ مرهق. هل هناك حيل ذكية تُنجز هذه المهمة بسرعة في Excel؟
جمع البيانات من أوراق متعددة في ورقة واحدة باستخدام دالة الدمج (Consolidate)
جمع البيانات من أوراق متعددة في ورقة واحدة باستخدام كود VBA
جمع البيانات من أوراق متعددة في ورقة واحدة باستخدام دالة الدمج القوية
جمع البيانات من أوراق متعددة في ورقة واحدة باستخدام دالة الدمج (Consolidate)
إذا كنت ترغب في جمع البيانات من أوراق متعددة في ورقة واحدة داخل نفس المصنف، فاستخدم دالة الدمج (Consolidate) في Excel.
1. في ورقة جديدة من المصنف الذي تريد جمع البيانات منه، انقر فوقبيانات > دمج (Consolidate).
2. في مربع الحوارConsolidate، قم بما يلي:
(1 اختر عملية واحدة تريد تنفيذها بعد دمج البيانات من قائمة)الدالة (Function)المنسدلة؛
(2 انقر فوق)
لتحديد النطاق من كل ورقة تريد جمع بياناته؛
(3 انقر فوق الزر)Addلإضافة نطاق البيانات إلى مربع القائمةAll references؛
(4) حدد التسميات التي تستخدمها بعد دمج البيانات، وحدد خيارCreate links to source data إذا كنت تريد ربط البيانات في الورقة المدمجة مع البيانات الأصلية.
3. انقر فوقموافق (OK). الآن، تم جمع البيانات وتوحيدها في ورقة واحدة.
ادمج أوراقًا/مصنفات متعددة بسهولة في ورقة واحدة أو مصنف واحد |
| قد يكون دمج أوراق أو مصنفات متعددة في ورقة واحدة أو مصنف واحد أمرًا شاقًّا في Excel، ولكن باستخدام دالةالدمجفي Kutools لـ Excel، يمكنك دمج عشرات الأوراق/المصنفات في ورقة واحدة أو مصنف واحد، بل ويمكنك أيضًا تجميع الأوراق في ورقة واحدة بنقرات قليلة فقط.انقر لتجربة مجانية كاملة الميزات لمدة 30 يومًا! |
 |
| Kutools لـ Excel: مع أكثر من 300 إضافة مفيدة لـ Excel، جرّبها مجانًا دون أي قيود لمدة 30 يومًا! |
جمع البيانات من أوراق متعددة في ورقة واحدة باستخدام كود VBA
فيما يلي كود VBA الذي يجمع البيانات من جميع الأوراق في ورقة جديدة داخل المصنف الحالي.
1. اضغط على مفتاحAlt + F11 لفتح نافذةMicrosoft Visual Basic for Applications.
2. انقر فوقInsert > Module، ثم انسخ والصق الكود أدناه في نافذة البرنامج النصيModule.
VBA: جمع جميع البيانات من الأوراق في ورقة واحدة.
Sub Combine()
'UpdatebyExtendoffice20180205
Dim I As Long
Dim xRg As Range
On Error Resume Next
Worksheets.Add Sheets(1)
ActiveSheet.Name = "Combined"
For I = 2 To Sheets.Count
Set xRg = Sheets(1).UsedRange
If I > 2 Then
Set xRg = Sheets(1).Cells(xRg.Rows.Count + 1, 1)
End If
Sheets(I).Activate
ActiveSheet.UsedRange.Copy xRg
Next
End Sub
3. اضغط على مفتاحF5لتشغيل الكود، وستجد أن جميع بيانات المصنف قد جُمعت بالكامل في الورقة الجديدة المُسماة «Combined».
جمع البيانات من أوراق متعددة في ورقة واحدة باستخدام دالةCombine القوية
إذا كنت عادةً بحاجة إلى دمج الأوراق في ورقة واحدة، فأقدّم لك دالة دمج قوية، وهي أداةKutools لـ Excel’s الدمج (Combine)التي توفر الوظائف الأربع الرئيسية التالية:
دمج أوراق عمل متعددة من مصنف واحد في ورقة عمل واحدة
دمج البيانات من عدة مصنفات مع نفس اسم ورقة العمل
نسخ ورقات العمل من عدة مصنفات إلى مصنف واحد
تجميع وحساب البيانات من عدة مصنفات إلى ورقة عمل واحدة
بعدتثبيت الإصدار المجانيKutools لـ Excel، يُرجى اتباع الخطوات التالية:
إذا كنت ترغب فقط فيدمجالأوراق في ورقة واحدة دون أي عمليات أخرى، فيمكنك اتباع الخطوات التالية:
1. شغّل Excel، ثم انقر فوقKutools Plus > Combine. ستظهر نافذة واحدة أو نافذتان لتذكيرك ببعض الملاحظات—فقط انقر فوقموافق (OK)ونعم (Yes)للمتابعة. انظر لقطة الشاشة:
2. انقر فوقموافق (OK)للانتقال إلى نافذةCombine، ثم اختر الخيارCombine multiple worksheets from workbook into worksheet.
3. انقر فوقNext، ثم انقر فوقAdd > File / Folder لإضافة المصنفات التي ستستخدمها للدمج إلىWorkbook list. بعد ذلك، انتقل إلىWorksheet list لتحديد الأوراق التي تريد دمجها من كل مصنف.
4. انقر فوقNext للانتقال إلى الخطوة الأخيرة، حيث يمكنك ضبط بعض الإعدادات المتعلقة بنتيجة الدمج وفقًا لاحتياجاتك. وإذا لم تكن بحاجة إلى هذه الخطوة،
5. انقر فوقFinish، ثم حدد مجلدًا لحفظ ورقة العمل الجديدة التي تجمع البيانات من الأوراق.
6. انقر فوقحفظ (Save). الآن، تم جمع جميع البيانات من الأوراق عبر المصنف في ورقة رئيسية واحدة.
إذا كنت تريددمجأوراق العمل عبر مصنفات متعددة في ورقة واحدة، فاتبع الخطوات التالية:
1. في نافذةCombine، اختر الخيارConsolidate and calculate values across multiple worksheets into one worksheet.
2. انقر فوقNext، ثم أضف الملفات إلىWorkbook list، وحدد الأوراق التي ستستخدمها للدمج والحساب.
3. انقر فوقNext، ثم اختر عملية حسابية واحدة من قائمةFunction المنسدلة، وحدّد الخيارات الأخرى حسب الحاجة.
4. انقر فوقFinish لحفظ ورقة عمل جديدة في مجلد.
الآن تم دمج الأوراق عبر المصنفات وحسابها في ورقة واحدة.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل