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

تنزيل المصنف

يمكنك تنزيل مصنف Excel التدريبي المجاني من هنا.

نسخ ولصق من ورقة عمل واحدة إلى أخرى. xlsm

15 طريقة باستخدام VBA لنسخ البيانات ولصقها من ورقة عمل إلى أخرى في Excel

في هذا القسم ، ستتعلم 15 طريقة حول كيفية نسخ البيانات من ورقة عمل واحدة والصقها في أخرى مع VBA في Excel.

أعلاه هي مجموعة البيانات التي ستعتبرها هذه المقالة كمثال لنا.

1. قم بتضمين ماكرو VBA لنسخ ولصق نطاق من البيانات من ورقة عمل واحدة إلى أخرى

الخطوات لنسخ ولصق نطاق من البيانات من ورقة عمل إلى أخرى باستخدام VBA موصوفة أدناه.

الخطوات:

• في البداية ، اضغط على Alt + F11 على لوحة المفاتيح أو انتقل إلى علامة التبويب المطور - & GT. Visual Basic لفتح محرر Visual Basic .

• في التعليمات البرمجية المنبثقة نافذة ، من شريط القوائم ، انقر فوق إدراج - & GT. الوحدة النمطية .

• الآن ، انسخ الكود التالي والخلايا التي تمت تصفيتها في Excel (4 طرق)
• خطأ وقت التشغيل 1004: فشل أسلوب PasteSpecial لفئة النطاق
• كيفية لصق الارتباط والتبديل في Excel (8 طرق سريعة)

12. الصق صفًا في أسفل النطاق مع الاحتفاظ بالصيغة المنسوخة من النطاق أعلاه

عندما تريد نسخ قيمة والاحتفاظ بالصيغة بداخلها أثناء لصقها صف آخر ، ثم باستخدام كود VBA يمكنك تنفيذ المهمة بسهولة.

الخطوات:

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

4135

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، قم بتشغيل هذا الرمز وانظر إلى الصورة أدناه.

يتم نسخ الصف الأخير تمامًا مثل إنه في الصف المجاور له.

اقرأ المزيد: كيفية نسخ البيانات من خلية إلى أخرى في Excel تلقائيًا

13. VBA لنسخ البيانات من ورقة واحدة إلى ورقة أخرى في مصنف آخر مفتوح ولكن غير محفوظ

لاحظ اسم نموذج المصنف الخاص بنا ، المصنف المصدر . سنقوم بنسخ البيانات من ورقة Dataset من هذا المصنف ولصقها في ورقة عمل أخرى في مصنف آخر باسم Destination Workbook وهذا هو مفتوح ولكن لم يتم حفظهبعد .

الخطوات:

• أولاً ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في إطار التعليمات البرمجية.
• ثانيًا ، انسخ الكود التالي و الصق في نافذة التعليمات البرمجية.

8491

كودك جاهز الآن للتشغيل.

• التالي ، قم بتشغيل هذا الرمز.

البيانات من ورقة مجموعة البيانات في ورقة تم الآن نسخ Source Workbook في الورقة Sheet1 في Destination Workbook .

قراءة المزيد: Excel VBA: نسخ قيمة الخلية ولصقها في خلية أخرى

14. ماكرو لإعادة إنتاج البيانات من ورقة واحدة إلى ورقة أخرى في مصنف آخر مفتوح ومحفوظ

هذه المرة ، سنقوم بنسخ البيانات من Dataset من المصنف المصدر و الصق في ورقة العمل الورقة 2 في المصنف الوجهة . ولكن الآن ، المصنف مفتوح ومحفوظ .

الخطوات:

• أولاً ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
• ثانيًا ، انسخ الكود التالي و الصق في نافذة التعليمات البرمجية.

3578

الكود الخاص بك جاهز الآن للتشغيل.

• بعد ذلك ، قم بتشغيل هذا الرمز.

البيانات من ورقة Dataset في المصدرتم الآن نسخ المصنف في الورقة Sheet2 في Destination Workbook . وانظر إلى الاسم ، تم حفظ هذا المصنف هذه المرة.

اقرأ المزيد: كيفية النسخ واللصق في Excel دون تغيير التنسيق

15. قم بتطبيق VBA لنسخ ولصق البيانات من ورقة عمل واحدة إلى ورقة عمل أخرى في مصنف آخر مغلق

في القسمين السابقين ، تعلمنا كيفية نسخ البيانات ولصقها من ورقة عمل إلى أخرى في مصنف آخر افتح. في هذا القسم ، سنتعلم الكود الخاص بكيفية نسخ البيانات ولصقها عند إغلاق المصنف .

الخطوات:

• أولاً ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل وحدة في نافذة التعليمات البرمجية.
• ثانيًا ، انسخ الكود التالي و الصقه في نافذة التعليمات البرمجية.

8281

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، تشغيل هذا الرمز.

على الرغم من أن المصنف هذه المرة كان مغلق ولكن لا يزال بعد تنفيذ التعليمات البرمجية ، يتم الآن نسخ البيانات من ورقة Dataset في Source Workbook في Sheet3 الورقة في Destination Workbook .

اقرأ المزيد: Excel VBA لنسخ البيانات من مصنف آخر دون فتح

أشياء يجب تذكرها

• تتطلب الطرق من 1 إلى 14 أن تكون المصنفات الخاصة بكفتح . عند تنفيذ أكواد الماكرو الموضحة في هذه الطرق ، لا تنسَ الاحتفاظ بمصنفات المصدر والوجهة مفتوحة.
• أثناء حفظ مصنفاتك ، اكتب اسم الملف بنوع الملف داخل الكود. عندما لا يتم حفظ المصنفات ، فاكتب فقط اسم الملف بدون نوع الملف. على سبيل المثال ، إذا تم حفظ المصنف ، فاكتب " الوجهة. xlsx " ، ولكن إذا كان لم يتم حفظ المصنف ، ثم اكتب " الوجهة " داخل الكود.

الخاتمة

أوضحت لك هذه المقالة كيفية نسخ البيانات ولصقها من ورقة عمل إلى أخرى في Excel باستخدام VBA . آمل أن يكون هذا المقال مفيدًا جدًا لك. لا تتردد في السؤال عما إذا كان لديك أي أسئلة بخصوص هذا الموضوع.

2450

الكود الخاص بك جاهز الآن للتشغيل.

هذا الجزء من التعليمات البرمجية ينسخ النطاق من B2 إلى F9 من الورقة المسماة Dataset ويلصق تلك الموجودة في النطاق B2 في CopyPaste الورقة المسماة .

• ثم ، اضغط على F5 على لوحة المفاتيح أو من القائمة حدد شريط تشغيل - & GT. تشغيل Sub / UserForm . يمكنك أيضًا النقر فوق رمز التشغيل الصغير في شريط القائمة الفرعية لتشغيل الماكرو.

انظر إلى الصورة التالية .

أخيرًا ، يتم الآن نسخ جميع البيانات من ورقة Dataset في CopyPaste <ورقة 19> في مصنف Excel الخاص بنا.

اقرأ المزيد: Excel VBA: نسخ النطاق إلى مصنف آخر

2 . ماكرو VBA لنسخ ولصق البيانات من ورقة عمل نشطة إلى أخرى في Excel

في القسم السابق ، لم نطلب ورقة العمل للتنشيط. لكن في هذا القسم ، سنتعلم كيفية نسخ البيانات ولصقها في ورقة عمل نشطة .

الخطوات:

• بالطريقة نفسها كما كان من قبل ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل وحدة في نافذة التعليمات البرمجية.
• في إطار التعليمات البرمجية ، انسخ الكود التالي و الصقه .

4753

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، قم بتشغيل الكود كما هو موضح أعلاه وشاهد النتيجة في ما يليimage.

هذه المرة ، يتم الآن نسخ جميع البيانات من ورقة Dataset في لصق الورقة التي قمنا بتنشيطها قبل نسخ البيانات.

قراءة المزيد: صيغة Excel لنسخ نص من خلية إلى ورقة أخرى

3. انسخ والصق خلية مفردة من ورقة عمل إلى أخرى في Excel باستخدام VBA Macro

في الأقسام أعلاه ، تعلمت كيفية نسخ ولصق مجموعة من البيانات من ورقة عمل إلى أخرى. الآن ، سترى كيفية النسخ واللصق عندما يكون لديك قطعة واحدة من البيانات في جدول بيانات Excel.

انظر إلى الصورة التالية ، النطاق تتكون الورقة من قيمة واحدة فقط.

سنرى كيف يمكننا نسخ ولصق هذه الخلية في أخرى ورقة في Excel مع VBA .

الخطوات:

• كما هو موضح أعلاه ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
• في نافذة التعليمات البرمجية ، انسخ ما يلي الكود و الصق

3530

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، قم بتشغيل هذا الجزء من التعليمات البرمجية ولاحظ الصورة التالية.

تلك البيانات المفردة " انسخ هذه الخلية ”في الخلية B4 في ورقة مجموعة البيانات تم نسخها الآن في الورقة CopyRange في الورقة الخلية B2 .

اقرأ المزيد: Excel VBA للنسخ فقطقيم الوجهة (ماكرو ، UDF ، ونموذج مستخدم)

4. لصق البيانات المنسوخة من ورقة عمل واحدة إلى أخرى باستخدام طريقة PasteSpecial في Excel Macro

يمكنك نسخ البيانات من ورقة عمل واحدة ولصقها بطرق مختلفة باستخدام Excel PasteSpecial الأسلوب مع فبا . فيما يلي خطوات القيام بذلك.

الخطوات:

• أولاً ، افتح محرر Visual Basic من Developer علامة التبويب و أدخل a الوحدة النمطية في نافذة التعليمات البرمجية.
• ثانيًا ، انسخ الكود التالي و الصق في نافذة الكود.

3793

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، تشغيل هذا الجزء من الكود.

انظر إلى الصورة أعلاه. يتم الآن نقل البيانات من ورقة Dataset في الورقة PasteSpecial في Excel.

اقرأ المزيد : لصق VBA خاص لنسخ القيم والتنسيقات في Excel (9 أمثلة)

5. ماكرو لنسخ ولصق البيانات أسفل الخلية الأخيرة من ورقة عمل واحدة إلى أخرى في Excel

لدينا بالفعل بعض البيانات في ورقة مجموعة البيانات (تظهر في قسم المقدمة). الآن ، انظر إلى الجزء التالي من هذا القسم. لدينا الآن بعض البيانات الجديدة في ورقة أخرى باسم الخلية الأخيرة .

ما نريد القيام به هنا هو ، انسخ بيانات محددة (الخلايا من B5 إلى F9) من ورقة مجموعة البيانات ثم الصق تلك الموجودة في أسفل الخلية الأخيرة من هذه الورقة الخلية الأخيرة .

الخطوات:

• أولاً ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
• ثانيًا ، انسخ الكود التالي و الصقه في نافذة التعليمات البرمجية.

9315

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، تشغيل هذا الرمز. انظر إلى الصورة أدناه.

هنا ، فقط البيانات المحددة من ورقة مجموعة البيانات هي الآن نسخ أسفل الخلية الأخيرة في الورقة الخلية الأخيرة في Excel.

اقرأ المزيد: صيغة لنسخ ولصق القيم في Excel ( 5 أمثلة)

6. ماكرو VBA لمسح ورقة العمل أولاً ، ثم انسخ والصق في ورقة عمل أخرى

ماذا لو كانت لديك بيانات خاطئة في الورقة الحالية وتريد استخراج البيانات الأصلية هناك.

انظر إلى الصورة التالية. سنقوم بمسح البيانات من الورقة Clear Range وتخزين البيانات من ورقة Dataset مع كود VBA .

الخطوات:

• أولاً ، افتح محرر Visual Basic من علامة التبويب المطور ثم إدراج a Module في نافذة التعليمات البرمجية.
• ثانيًا ، انسخ الكود التالي و الصق في نافذة الكود.

2473

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، تشغيل هذا الجزء من التعليمات البرمجية. انظر الىالصورة التالية.

يتم الآن استبدال البيانات السابقة في الورقة Clear Range بالبيانات من Dataset sheet.

اقرأ المزيد: ماكرو لنسخ البيانات من مصنف إلى آخر بناءً على المعايير

7. ماكرو لنسخ البيانات ولصقها من ورقة عمل إلى أخرى باستخدام وظيفة Range.Copy

الآن ، سنتعلم رمز VBA حول كيفية نسخ البيانات ولصقها من ورقة عمل إلى أخرى باستخدام الدالة Range.Copy في Excel.

الخطوات:

• أولاً ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل وحدة في نافذة التعليمات البرمجية.
• ثانيًا ، نسخ الكود التالي و الصق في نافذة الكود.

6211

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، قم بتشغيل هذا الجزء من التعليمات البرمجية وانظر إلى الصورة التالية.

لقد نجحنا في تكرار البيانات من الورقة مجموعة البيانات في الورقة نطاق النسخ مع الوظيفة Range.Copy .

قراءة المزيد: صيغة Excel لنسخ قيمة الخلية إلى خلية أخرى

قراءات مماثلة

• Excel VBA لنسخ الصفوف إلى ورقة عمل أخرى بناءً على المعايير
• استخدم VBA للصق القيم على الإنترنت y بدون تنسيق في Excel
• كيفية نسخ ولصق الخلايا المرئية فقط في Excel (3 طرق سهلة)
• نسخ ولصقلا يعمل في Excel (9 أسباب وحلول)
• كيفية نسخ صفوف متعددة في Excel باستخدام ماكرو (4 أمثلة)

8. قم بتطبيق رمز الماكرو لتكرار البيانات من ورقة عمل واحدة إلى أخرى باستخدام خاصية USEDRANGE

هذه المرة ، سنتعلم رمز VBA حول كيفية نسخ البيانات ولصقها من واحدة ورقة عمل إلى أخرى باستخدام السمة UsedRange في Excel.

الخطوات:

• أولاً ، افتح Visual Basic محرر من علامة التبويب Developer و أدخل a Module في إطار التعليمات البرمجية.
• ثانيًا ، انسخ الكود التالي و الصق في نافذة التعليمات البرمجية.

5445

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، تشغيل قطعة الكود هذه.

كما نرى في الصورة أعلاه ، قمنا بنسخها ولصقها بنجاح البيانات من الورقة Dataset في الورقة UsedRange مع الخاصية USEDRANGE .

قراءة المزيد: كيفية نسخ نفس القيمة في خلايا متعددة في Excel (4 طرق)

9. ماكرو VBA لنسخ ولصق البيانات المحددة من ورقة إلى أخرى في Excel

يمكنك نسخ ولصق بعض البيانات المحددة فقط من ورقة عمل إلى أخرى مع فبا . خطوات القيام بذلك موضحة أدناه.

الخطوات:

• أولاً ، افتح محرر Visual Basic من Developer علامة التبويب و أدخل وحدة فينافذة الكود.
• ثانيًا ، انسخ الكود التالي و الصق في نافذة الكود.

3291

الكود الخاص بك هو الآن جاهز للتشغيل.

سيقوم هذا الرمز بنسخ النطاق من B4 إلى F7 فقط من ورقة مجموعة البيانات و لصق تلك الموجودة في النطاق B2 في PasteSelected الورقة المسماة .

• التالي ، قم بتشغيل هذا الرمز.

أخيرًا ، فقط البيانات المحددة من ورقة مجموعة البيانات تم نسخها ولصقها بنجاح في الورقة لصق المحدد في مصنف Excel.

اقرأ المزيد: كيفية تطبيق VBA PasteSpecial and احتفظ بتنسيق المصدر في Excel

10. رمز الماكرو لتكرار البيانات من ورقة عمل واحدة إلى أخرى في أول صف فارغ

هنا ، سنرى كيفية نسخ البيانات من Dataset ورقة و لصق تلك الموجودة في الخلية الفارغة الأولى في ورقة عمل أخرى في Excel مع VBA .

الخطوات:

• أولاً ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة الكود.
• ثانيًا ، انسخ الكود التالي و الصقه في نافذة الكود.

1186

الرمز الخاص بك هو الآن جاهز للتشغيل.

• التالي ، تشغيل هذا الجزء من التعليمات البرمجية.

انظر في الصورة أعلاه. الورقة 13 كانت فارغة تمامًا. نتيجة لذلك ، تم لصق الكود المنفذالبيانات المنسوخة من الورقة Dataset في الخلية الأولى في الورقة Sheet13 في Excel.

اقرأ المزيد: نسخ القيم ولصقها في الصف الفارغ التالي باستخدام Excel VBA (3 أمثلة)

11. قم بتضمين VBA لنسخ ولصق البيانات التي تمت تصفيتها تلقائيًا من ورقة Excel واحدة إلى أخرى

يمكننا تصفية مجموعة البيانات المصدر ونسخ البيانات التي تمت تصفيتها ولصقها فقط في ورقة عمل أخرى في اكسل. اتبع هذه المقالة لمعرفة كيفية القيام بذلك خطوة بخطوة مع VBA .

الخطوات:

• أولاً ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل وحدة في إطار التعليمات البرمجية.
• ثانيًا ، انسخ التعليمات البرمجية التالية و الصق في نافذة التعليمات البرمجية.

6074

الكود الخاص بك جاهز الآن للتشغيل.

• التالي ، تشغيل هذا الرمز. فقط الصف الذي يحتوي على " Dean " ، سيتم ترشيحه ونسخه في ورقة أخرى.

لاحظ في الصورة أعلاه. يتم الآن نسخ البيانات المصفاة " Dean " من B Column الآن ولصقها في الورقة Sheet15 .

قراءة المزيد: كيفية النسخ واللصق في Excel باستخدام VBA (7 طرق)

القراءات المتشابهة

• كيفية التصفية التلقائية ونسخ الصفوف المرئية باستخدام Excel VBA
• نسخ القيم الفريدة إلى ورقة عمل أخرى في Excel (5 طرق)
• كيفية نسخ الملفات المدمجة وملفات