كيف يمكن نسخ أوراق عمل متعددة عدة مرات في Excel؟

ميزة Excel المضمنةالنقل أو النسختوفّر طريقة مباشرة لتكرار أوراق العمل. تُعدّ هذه الطريقة مثالية عندما تحتاج إلى إنشاء نسخة احتياطية واحدة من أوراق بياناتك الأصلية، أو مشاركة ورقة عمل محددة مع زملائك، أو نقل أوراق عمل معيّنة إلى ملف آخر. ومع ذلك، فهي أكثر فعالية عند الحاجة إلى نسخة واحدة فقط من كل ورقة في المرة الواحدة، إذ يتطلب إنشاء نسخ متعددة تكرار العملية يدويًا.

1. في المصنف الذي تريد نسخ أوراق العمل فيه، حدد الأوراق التي ترغب في نسخها من شريط أوراق التبويب.
ملاحظة: اضغط مع الاستمرار على مفتاحCTRL لتحديد أوراق غير متجاورة متعددة بالنقر على كل واحدة منها بشكل فردي. ولتحديد سلسلة من الأوراق المجاورة، انقر على علامة التبويب الأولى، ثم اضغط مع الاستمرار على مفتاحSHIFT، وانقر على علامة التبويب الأخيرة في السلسلة.

2. انقر بزر الماوس الأيمن على أي علامة تبويب محددة، ثم اخترالنقل أو النسخمن قائمة السياق. وسيؤدي ذلك إلى فتح مربع حوار النقل أو النسخ.

3. في مربع حوارالنقل أو النسخ، عدّل الخيارات التالية حسب الحاجة:
(1) استخدم قائمةالكتاب المراد النسخ إليهالمنسدلة لتحديد المصنف الذي تريد نسخ الأوراق إليه. يمكنك اختيار المصنف الحالي (النشط)، أو مصنفًا آخر مفتوحًا مسبقًا، أو إنشاء مصنف جديد تمامًا يحتوي على ورقة عمل جديدة.
(2) حدد موقع الأوراق المنقولة في مربعقبل الورقة. عادةً، يسهّل وضع النسخ بعد جميع الأوراق الموجودة العثور عليها بسهولة.
(3) قبل النقر على زرموافق، تأكد من تأشير خيارإنشاء نسخة. إذا لم تختره، فسيتم نقل الأوراق (أي إزالتها من موضعها الأصلي) إلى الوجهة بدلاً من نسخها.
(4) انقر على زرموافقلإكمال عملية النسخ.

بمجرد التأكيد، ينشئ Excel نسخة واحدة من كل ورقة عمل محددة في المصنف والموقع المعيّنين.

إذا كنت بحاجة إلى أكثر من نسخة واحدة من نفس ورقة العمل (أو الأوراق)، فكرّر هذه العملية بالعدد المطلوب من المرات. ضع في اعتبارك أنه مع التكرار المتعدد، قد تتضمّن أسماء الأوراق أرقامًا متزايدة (مثل «ورقة1 (2)»، «ورقة1 (3)»)، مما يسهّل تتبع النسخ المكررة.
السيناريوهات المناسبة:مثالية للنسخ الاحتياطي لأوراق العمل الأصلية، أو نقل ورقة عمل محددة بين الملفات، أو إنشاء عدد محدود من النسخ بسرعة.
المزايا:ميزة مضمنة لا تتطلب إضافات، وسهلة التنفيذ للنسخ لمرة واحدة.
العيوب:غير فعّالة عند الحاجة إلى نسخ متعددة، إذ يتطلب كل نسخة إضافية تكرارًا يدويًّا.

نصائح وتحذيرات:

• عند نسخ أوراق العمل إلى ورقة عمل جديدة، تذكّر حفظ الملف الناتج باسمٍ ذي معنى لتجنب فقدان البيانات.
• قد تتطلب بعض المراجع أو الصيغ التي تشير إلى أوراق عمل أخرى اهتمامًا خاصًا بعد النسخ، لا سيما عند نقلها إلى الملف المُنشأ.
• قد تُحتفظ حماية الورقة أو حالتها المخفية أو ماكرواتها—أو لا—وفقًا لإعدادات مصنفك، لذا تحقق مرتين بعد النسخ إذا كانت هذه الميزات مهمة لك.

إذا كنت بحاجة إلى نسخ عدة أوراق عمل أكثر من مرة داخل نفس المصنف، فإن تكرار عملية النسخ أو النقل يدويًا قد يستغرق وقتًا طويلاً جدًا. بدلًا من ذلك، تبسّط ميزةنسخ صفحات العملالمضمنة فيKutools لـ Excelهذه العملية بشكل كبير—مما يمكّنك من إنشاء نسخ متعددة من عدة أوراق عمل دفعة واحدة وبخطوة واحدة فقط!

1. انقر علىKUTOOLS PLUS > نسخ صفحات العملفي الشريط. سيؤدي ذلك إلى فتح معالج نسخ صفحات العمل بالجملة.

ملاحظة: بديلًا عن ذلك، يمكنك الوصول إلى نفس الميزة عبرKUTOOLS PLUS > ورقة العمل > نسخ صفحات العمل.

2. في مربع حوارنسخ صفحات العمل بالجملة، قم بإعداد تفضيلاتك:
(1) حدد أوراق العمل التي تريد نسخها بتأشيرها في قائمةنسخ صفحات العمل المحددة.
(2) حدّد عدد النسخ التي ترغب في إنشائها في مربععدد النسخ. على سبيل المثال، أدخل "3" لإنشاء ثلاث نسخ من كل ورقة محددة.
(3) اختر موضع الأوراق الجديدة (مثل وضعها بعد ورقة العمل النشطة، أو قبل جميع أوراق العمل، إلخ.).
(4) عند الانتهاء، انقر على زرموافقللمتابعة.

3. سيظهر مربع حوار تأكيد يُبلغك بأن الأوراق المحددة قد تم نسخها بنجاح بالعدد المحدد من المرات. انقر على زرموافقلإغلاق هذا التنبيه.

تجعلك هذه الميزة تنسخ أوراق عمل متعددة بسهولة بالغة، دون الحاجة إلى تنفيذ خطوات يدوية متكررة.
السيناريوهات المناسبة:مثالية لإنشاء نماذج عيّنات بكفاءة لأشخاص متعددين، أو نسخ أوراق عمل دُفعات لمهام شهرية متكررة، أو إعداد قوالب بسرعة لأقسام مختلفة.
المزايا:توفر وقتك في العمليات الجماعية، مع خطوات سهلة المتابعة ولا حاجة للتكرار اليدوي.
العيوب:تتطلب تثبيت إضافة Kutools لـ Excel.
استكشاف الأخطاء وإصلاحها والنصائح:

• إذا كنت بحاجة إلى نسخ جميع الأوراق دفعة واحدة، فاستخدم ميزة «تحديد الكل» في المعالج.
• تأكد مرتين من صحة عدد النسخ وورقة العمل المحددة قبل التأكيد، إذ قد تتطلب عمليات النسخ الجماعية مراجعة دقيقة لتجنب أي التباس.
• إذا كان مصنفك محميًا، فقم بإزالة الحماية مؤقتًا قبل استخدام هذه الأداة، ثم أعد تطبيقها لاحقًا إذا لزم الأمر.

إذا لم تكن تمتلك Kutools لـ Excel بعد، فيمكنك استكشاف ميزات الأداة دون مخاطرة باستخدام نسخة تجريبية.جرّبها مجانًا!

عندما تحتاج إلى إنشاء عدد كبير من النسخ—مثل 10 أو حتى 100 نسخة—من ورقة عمل واحدة، قد تصبح أدوات Excel القياسية مرهقة للغاية. بدلًا من ذلك، يمكنك أتمتة العملية بكل سهولة باستخدام ماكرو VBA بسيط، وهو حل مثالي لإنشاء مصنف يحتوي على قوالب جاهزة أو نسخ متعددة من نموذج لإدخال البيانات، مثل الاستبيانات أو الفواتير.

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

2. انتقل إلىإدراج > وحدة البرمجة (Module)، ثم الصق الكود التالي في نافذة الوحدة:

VBA: إنشاء نسخ متعددة من ورقة عمل معيّنة داخل المصنف الحالي

Sub Copier ()
Dim x As Integer
x = InputBox("Enter number of times to copy Sheet1")
For numtimes = 1 To x
ActiveWorkbook.Sheets("Sheet1").Copy _
After:=ActiveWorkbook.Sheets("Sheet1")
Next
End Sub

ملاحظة: يُرجى استبدال "Sheet1" في الكود باسم الورقة الفعلي الذي تريد تكراره. تأكد من وجود الورقة في ملفك قبل تشغيل الكود، وإلا فقد تواجه خطأً.

3. اضغطF5 لتشغيل الكود. سيتم مطالبتك بإدخال عدد النسخ التي ترغب في إنشائها لورقة العمل المحددة.

4. بعد إدخال العدد المطلوب والتأكيد، سيُنشئ الماكرو النسخ المطلوبة بسرعة، ويكون لكلٍّ منها اسم فريد (مثل: "Sheet1 (2)"، "Sheet1 (3)"، إلخ).

السيناريوهات المناسبة:استخدم هذه الطريقة عندما تحتاج إلى إنتاج أوراق متطابقة بكميات كبيرة لأغراض إدخال البيانات، أو قوالب سير العمل، أو نماذج الاختبارات.
المزايا:يؤتمت المهام المتكررة، ويتيح تخصيصًا واسعًا.
العيوب:يتطلب معرفة أساسية بمُحرر VBA، وقد تحتاج إلى تمكين أذونات الماكرو في ملفك.
استكشاف الأخطاء والنصائح:

• إذا كان مصنفك محفوظًا بصيغة .xlsx، فاحرص على حفظه بصيغة .xlsm للحفاظ على ماكرواتك.
• إذا فشل ماكروك، فتأكد مرتين من كتابة اسم الورقة في الكود وتحقق من عدم وجود أي تعارض في الأسماء.
• إذا كانت إعدادات أمان الماكرو مضبوطة على المستوى العالي، فقم بتعديلها للسماح بتشغيل أكواد VBA في المصنفات الممكنة بالماكرو.

في السيناريوهات التي تحتاج فيها إلى دمج أوراق العمل من عدة ملفات مختلفة—مثل جمع المدخلات من أعضاء فريق متعددين أو دمج التقارير الشهرية—تكون ميزةتجميع ورقات العملمن Kutools لـ Excel مفيدة للغاية. وبخطوات قليلة فقط، يمكنك استخراج ودمج أوراق محددة من ملفات مغلقة متعددة مباشرةً في ورقة عمل جديدة.

1. انتقل إلىKUTOOLS PLUS > دمجلتفعيل معالج تجميع ورقات العمل.

2. في الخطوة 1 من المعالج، اختر خيارنسخ البيانات من عدة مصنفات إلى ورقة عمل واحدة، ثم انقرالتالي.

3. في الخطوة 2، اتبع الخطوات التالية لاختيار أوراق العمل عبر الملفات:
(1) انقرإضافة > ملفأومجلدلتحديد الملفات التي تريد استخراج أوراق العمل منها.
(2) فيقائمة دفتر العمل، حدد الملفات التي تهمك.
(3) فيقائمة ورقة العمل، حدد ورقة العمل (أو الأوراق) التي ترغب في نسخها من كل ملف.
(4) كرّر ذلك لكل ملف تريد تضمينه.
(5) بعد إجراء التحديدات، انقرالتالي.

4. في الخطوة 3، قم بضبط أي إعدادات نسخ إضافية وفقًا لاحتياجاتك، مثل طريقة دمج البيانات والتنسيق، ثم انقرإنهاءلإكمال العملية.

5. حدد مجلد الوجهة واسم الملف لورقة العمل الجديدة في مربع الحوار الظاهر، ثم انقرحفظ.

أخيرًا، قد يُطلب منك تحديد ما إذا كنت ترغب في فتح ورقة عمل جديدة وحفظ سيناريو الدمج لاستخدامه لاحقًا. قم باختياراتك حسب احتياجاتك. الآن، تكون جميع أوراق العمل المحددة من الملفات المختارة قد دُمجت بنجاح في ملف واحد مُنشأ.

أداة تجميع ورقات العمل مرنة للغاية:

• اجمع بسرعة عدة أوراق عمل أو نطاقات من ملفات مختلفة في ورقة عمل واحدة.
• ادمج جميع أوراق العمل التي تحمل أسماءً متماثلة من عدة مصنفات في ورقة ملخص واحدة.
• وحّد أو ادمج مصنفاتك بالكامل لإدارتها بسهولة.
• اجمع أو احسب البيانات من مصادر متعددة في مكان واحد.

المزايا:مثالية لدمج البيانات من أشخاص أو مشاريع منفصلة، وتوفّر وقتك الثمين عند إعداد التقارير الروتينية.
العيوب:تتطلب تثبيت Kutools لـ Excel.
تأكد من مراجعة البيانات المدمجة بحثًا عن المعلومات المكررة أو المفقودة، خاصةً بعد دمج أوراق عمل كبيرة أو متشابهة.

إذا لم تجرّب هذه الأداة بعد،جرّبها مجانًا!

على الرغم من أن صيغ Excel لا تتيح تكرار أوراق العمل بالكامل، إلا أن هناك بديلاً شبه يدوي يتمثّل في إعداد قالب جديد لورقة العمل واستخدام الصيغ لاستيراد البيانات من المصدر. وتُعدّ هذه الطريقة مثالية عندما تحتاج فقط إلى تكرار البيانات—مثل إعداد التقارير أو القوالب—وليس النسخ الكامل للرسوم البيانية أو تنسيقات الخلايا أو الماكرو.

1. أنشئ ورقة عمل جديدة، ثم استخدم مراجع الخلايا أو الصيغ لتكرار البيانات التي تريدها. على سبيل المثال، في الخلية A1 من ورقتك الجديدة، أدخل:

=Sheet1!A1

2. اسحب مقبض التعبئة لنسخ الصيغة إلى النطاق المطلوب، مما سيُنشئ رابطًا بين كل خلية في الورقة الجديدة ونظيرتها في ورقة المصدر.

3. لإنشاء نسخ إضافية، قم بتكرار ورقة العمل الجديدة وحدّث الصيغ أو المراجع حسب الحاجة (مثل تعديل المراجع لتوجيهها إلى ورقة مصدر مختلفة إذا لزم الأمر).

السيناريوهات المناسبة:مثالية لقوالب التقارير أو عندما تحتاج فقط إلى تكرار البيانات (بدون تنسيق أو أكواد).
المزايا:لا تتطلب أي أدوات إضافية.
العيوب:تتطلب جهدًا يدويًّا كبيرًا عند التعامل مع كميات ضخمة من البيانات، ولا تدعم تكرار التنسيقات المتقدمة أو الأشكال أو أكواد VBA.

نصائح:بعد إنشاء الربط باستخدام الصيغ، يمكنك استخداملصق كقيملتحويل الصيغ إلى قيم إذا كنت ترغب في الحصول على بيانات ثابتة بدلًا من الخلايا المرتبطة.

إذا كانت لديك قائمة بأسماء أوراق العمل التي تحتاج غالبًا إلى تكرارها، يمكنك استخدام VBA لنسخ كل هذه الأوراق دفعة واحدة بأقل قدرٍ من الإدخال اليدوي. وتُعد هذه الطريقة مثالية لأوراق القوالب أو النماذج الموحَّدة التي تُوزَّع شهريًّا أو ربع سنويًّا أو لمجموعات التدريب.

1. اضغطALT + F11 لفتح نافذة Visual Basic for Applications.

2. في محرر VBA، انقرإدراج > وحدة البرمجة (Module)، ثم انسخ والصق الكود أدناه في نافذة الوحدة الجديدة:

Sub CopyListSheets()
    Dim wsName As Variant
    Dim CopyCount As Integer
    Dim i As Integer
    Dim sheetExists As Boolean
    Dim ws As Worksheet
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    wsNames = Array("Sheet1", "Sheet2") 'Edit these names to your target sheets
    
    CopyCount = Application.InputBox("Enter the number of copies:", xTitleId, Type:=1)
    
    For Each wsName In wsNames
        sheetExists = False
        
        For Each ws In Worksheets
            If ws.Name = wsName Then
                sheetExists = True
                Exit For
            End If
        Next
        
        If sheetExists Then
            For i = 1 To CopyCount
                Worksheets(wsName).Copy After:=Sheets(Sheets.Count)
            Next i
        End If
    Next wsName
End Sub

3. اضغطF5 لتشغيل الكود. عند المطالبة، أدخل عدد النسخ التي تريدها لكل ورقة. سيتم نسخ الأوراق المحددة بالعدد المطلوب وإضافتها في نهاية ملفك.

ملاحظة:عدّل السطرwsNames = Array("Sheet1", "Sheet2") ليشمل أسماء جميع الأوراق التي تريد تكرارها. هذا الحل مثالي لمعالجة الأوراق ذات النماذج القياسية دفعةً واحدة!

نصائح وتذكيرات بالأخطاء:

• إذا كان أيٌّ من أسماء أوراق العمل مكتوبًا بشكل خاطئ أو مفقودًا، فسيتم تخطي تلك الورقة.
• تأكد من ألا تتجاوز حدود أوراق العمل في Excel (عادةً حتى 255 ورقة لكل مصنف، لكن قد يبدأ الأداء في التباطؤ مع الملفات الكبيرة قبل بلوغ هذا الحد).