كيفية تطبيق VBA PasteSpecial والحفاظ على تنسيق المصدر في Excel

Hugh West

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

تنزيل Practice Workbook

تنزيل هذا المصنف التدريبي للتمرين أثناء قراءة هذه المقالة.

VBA PasteSpecial.xlsm

4 أمثلة سهلة لتطبيق VBA PasteSpecial والحفاظ على تنسيق المصدر في Excel

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

1. أضف مربع إدخال باستخدام VBA PasteSpecial واحتفظ بتنسيق المصدر في Excel

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

الخطوة 1:

  • أولاً ، اضغط على Alt + F11 لبدء ماكرو .
  • ثم ، انقر فوق إدراج ، اختر الخيار الوحدة النمطية .

الخطوة 2:

  • الصق ما يليكود VBA.
5660

الخطوة 3:

  • احفظ البرنامج و اضغط على F5 لتشغيله.
  • بعد ظهور مربع 'ExcelWIKI' ، حدد النطاق $ B $ 4: $ C $ 11 .
  • انقر فوق موافق .

الخطوة 4:

  • حدد أي خلية فارغة للصقها.
  • ثم انقر فوق موافق.

  • لذلك ، ستحصل قيمة اللصق عن طريق الحفاظ على التنسيق كما هو.

قراءة المزيد: الفرق بين اللصق واللصق الخاص في Excel

2. تطبيق VBA PasteSpecial لتحديد النطاق والاحتفاظ بتنسيق المصدر في Excel

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

الخطوة 1:

  • اضغط على Alt + F11 لفتح ماكرو .
  • إنشاء وحدة نمطية جديدة من إدراج
  • ببساطة ، قم بلصق رمز VBA التالي النطاق B4: C11 .
3904

الخطوة 2:

  • أخيرًا ، احفظ البرنامج واضغط على F5 للتشغيل. وبالتالي ، سترى التغييرات كما هو موضح في الصورة أدناه.

اقرأ المزيد: VBA Paste Special to Copy Values ​​and Formats in Excel (9 أمثلة)

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

  • كود VBA لمقارنة ورقتي Excel ونسخ الاختلافات
  • Excel VBA: نسخ قيمة الخلية ولصقهاإلى خلية أخرى
  • كيفية نسخ خلايا متعددة إلى ورقة أخرى في Excel (9 طرق)
  • Excel VBA: نسخ النطاق إلى مصنف آخر
  • [ثابت]: انقر بزر الماوس الأيمن فوق النسخ واللصق لا يعملان في Excel (11 حلول)

3. قم بتعريف المتغير عن طريق تطبيق VBA PasteSpecial and Keep تنسيق المصدر في Excel

بالتصريح عن المتغيرات وتعيين المتغيرات لنطاقات مختلفة ، اتبع الخطوات أدناه للصق خاص في VBA .

الخطوة 1:

  • أولاً ، اضغط على Alt + F11 لفتح VBA Macro .
  • حدد جديدًا الوحدة النمطية .
  • ثم الصق ما يلي كود فبا .
5137

الخطوة 2:

  • بعد حفظ البرنامج ، اضغط على F5 للتشغيل.
  • لذلك ، سيتم لصق النطاق المنسوخ مع الاحتفاظ بتنسيق المصدر كـ قبل.

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

4. استخدم VBA PasteSpecial واحتفظ بها ce Formatting in different Worksheet in Excel

سنتحدث عن طريقة مهمة جدًا في هذا الجزء. لأننا سنتعرف على كيفية استخدام PasteSpecial في VBA في العديد من المصنفات. على سبيل المثال ، سننسخ من 'Sheet4' ونلصقه في 'Sheet5 ،' كما هو موضح في الخطوات أدناه.

الخطوة 1:

  • لفتح VBA Macro ، اضغط على Alt + F11
  • من علامة التبويب إدراج ، اختر الوحدة النمطية .
  • ثم الصق التالي VBA.
3728

الخطوة 2:

  • لتشغيل البرنامج ، اضغط على F5 بعد حفظ البرنامج.
  • لذلك ، ستحصل على القيمة الملصقة في الورقة 5 مع الاحتفاظ بتنسيق المصدر.

قراءة المزيد: كيفية استخدام Paste Special Command في Excel (5 طرق مناسبة)

الاستنتاج

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

لا تتردد في الاتصال بنا إذا كان لديك أي أسئلة. يرجى مشاركة أفكارك في مربع التعليقات أدناه.

سيتم الرد على أسئلتك في أقرب وقت ممكن من قبل فريق عمل Exceldemy .

ابق معنا واستمر في التعلم.

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