جدول المحتويات
عندما نحتاج إلى نسخ ولصق أي بيانات في Microsoft Excel ، فلدينا تسهيلات الاختصارات وأدوات الشريط المختلفة في Excel. يحتوي Excel VBA الماكرو أيضًا على مثل هذه التسهيلات بدلاً من خيارات المصنف. سنناقش قيم وتنسيقات VBA Paste Special في Excel.
تنزيل Practice Workbook
تنزيل هذا المصنف التدريبي للتمرين أثناء القراءة هذه المقالة.
القيم والتنسيقات باستخدام PasteSpecial.xlsm
9 أمثلة لنسخ القيم والتنسيقات مع لصق خاص في Excel VBA
في هذه المقالة ، سنناقش 9 طرق مع وحدات ماكرو VBA لصق قيم وتنسيق خاص في Excel.
سنقوم ضع في اعتبارك مجموعة البيانات أدناه لهذا الغرض.
1. تطبيق InputBox في VBA Paste Special لنسخ القيم والتنسيقات
سنستخدم خيار InputBox في هذا المثال من أجل لصق خاص .
الخطوة 1 :
- انتقل إلى علامة التبويب Developer .
- انقر فوق تسجيل ماكرو .
- Set Excel_Paste_Special_1 كاسم الماكرو .
- ثم اضغط موافق .
الخطوة 2:
- الآن ، انقر فوق الأمر وحدات الماكرو .
- حدد ماكرو ثم اضغط انتقل إلى .
الخطوة 3:
- انسخ والصق ما يلي رمز في وحدة الأوامر.
9151
الخطوة 4:
- اضغط على F5 لتشغيل ملفكود.
- سيظهر مربع حوار جديد. حدد نطاق المصدر في هذا المربع.
- ثم اضغط موافق .
الخطوة 5:
- سيظهر مربع حوار آخر. اختر نطاقًا فارغًا حيث يتم لصق الخلايا المنسوخة.
الآن ، انظر إلى مجموعة البيانات.
يتم نسخ جميع البيانات مع القيم والتنسيقات باستخدام VBA Paste Special .
قراءة المزيد: كيفية تطبيق VBA PasteSpecial والاحتفاظ بتنسيق المصدر في Excel
2. أدخل نطاق الخلايا مع القيم والتنسيقات باستخدام xlPasteAllUsingSourceTheme في لصق خاص لـ VBA
سنقوم بإدراج نطاق الخلايا مباشرة على كود VBA في هذا القسم.
الخطوة 1:
- اضغط على Alt + F11 للدخول إلى وحدة الأوامر
- ضع الكود التالي في وحدة الأوامر.
4169
الخطوة 2:
- الآن ، اضغط على F5 لتشغيل الكود.
هذا الأمر xlPasteAllUsingSourceTheme ينسخ التكرار الدقيق لبيانات المصدر.
اقرأ المزيد: Excel VBA: نسخ قيمة الخلية ولصقها في خلية أخرى
3. استخدم متغير VBA لإدراج النطاق مع القيم والتنسيقات باستخدام لصق خاص
سنعرض استخدام المتغيرات في كود لصق خاص لـ VBA هنا.
الخطوة 1:
- أولاً ، أدخل وحدة الأوامر بالضغط على Alt + F11 .
- اكتب الكود أدناه في الأمر
3285
الخطوة 2:
- اضغط على F5 وقم بتشغيل كود.
اقرأ المزيد: Excel VBA: نسخ النطاق إلى مصنف آخر
4. استخدم xlPasteValues و xlPasteFormats لنسخ القيم والتنسيقات في ورقة أخرى الحفاظ على التنسيقات بدون تغيير
تم استخدام الطرق المذكورة أعلاه لنسخ البيانات ولصقها في نفس الورقة. الآن ، سوف نعرض كيفية استخدام VBA Paste Special للأوراق المختلفة.
الخطوة 1:
- أدخل وحدة الأوامر بالنقر فوق Alt + F11 ونسخ الكود التالي عليه.
5511
الخطوة 2:
- اضغط على F5 لتشغيل الكود.
يمكننا رؤية تلك البيانات من Data_Set تم نسخ> إلى مختلف_ورقة .
اقرأ المزيد: كيفية استخدام VBA PasteSpecial للصيغ والتنسيقات في Excel (3 طرق)
قراءات مماثلة
- كيفية نسخ خلايا متعددة إلى ورقة أخرى في Excel (9 طرق)
- الفرق بين اللصق واللصق الخاص في Excel
- Excel VBA لنسخ البيانات من مصنف آخر دون فتح
- كيفية النسخ واللصق في Excel و الاحتفاظ بحجم الخلية (7 أمثلة)
- نسخ القيم ولصقها في الصف الفارغ التالي باستخدام Excel VBA (3 أمثلة)
5 . استخدم xlPasteFormats للصق التنسيقات فقط
في الطرق السابقة ، قمنا بنسخ البيانات بالكامل ولصقهابدون تغيير. ولكن في هذا القسم ، سنقوم بنسخ تنسيق البيانات فقط.
الخطوة 1:
- انتقل إلى وحدة الأوامر بالضغط على Alt + F11 .
- انسخ والصق الكود أدناه في وحدة الأوامر.
9139
الخطوة 2:
- الآن ، اضغط على الزر F5 وقم بتشغيل الكود.
انظر إلى مجموعة البيانات. يتم نسخ التنسيقات فقط ، ولا توجد قيم هنا.
اقرأ المزيد: كيفية النسخ واللصق في Excel دون تغيير التنسيق
6. استخدم xlPasteValues للصق القيم فقط
يمكننا نسخ القيم فقط باستخدام VBA Paste Special .
الخطوة 1:
- اضغط على Alt + F11 للدخول إلى وحدة الأوامر
- اكتب الكود التالي في وحدة الأوامر.
1980
الخطوة 2:
- انقر فوق F5 وقم بتشغيل الكود.
لاحظ مجموعة البيانات. يتم نسخ القيم فقط هنا. لم يتم نسخ أي تنسيقات في هذه الطريقة.
اقرأ المزيد: كيفية استخدام VBA للصق القيم فقط بدون تنسيق في Excel
7. انسخ والصق جميع محتويات خلية مفردة
في الأقسام السابقة ، قمنا بنسخ مجموعة من البيانات. هنا ، سنقوم بنسخ خلية واحدة فقط.
الخطوة 1:
- الآن ، اضغط على Alt + F11 وأدخل الأمر module.
- اكتب الكود التالي على الوحدة.
8287
الخطوة 2:
- الآن ، اضغط على F5 لتشغيل الكود.
يمكننا أن نرى أنه تم نسخ خلية واحدة هنا ، وليس نطاقًا.
قراءة المزيد: صيغة لنسخ ولصق القيم في Excel (5 أمثلة)
8. انسخ والصق كافة سمات عمود معين باستخدام VBA
مثل خلية واحدة ، يمكننا نسخ عمود واحد في مجموعة البيانات.
الخطوة 1:
- اضغط ببساطة على Alt + F11 للدخول إلى وحدة الأوامر.
- اكتب الكود أدناه في الوحدة.
4543
الخطوة 2:
- قم بتشغيل الكود بالضغط على F5 .
هنا ، يمكننا أن نرى أنه تم نسخ العمود B إلى العمود E .
اقرأ المزيد: [ثابت]: انقر بزر الماوس الأيمن نسخ ولصق لا يعملان في Excel (11 حلًا)
9. انسخ والصق جميع سمات الصف باستخدام Excel VBA
وبالمثل ، يمكننا نسخ صف واحد باستخدام لصق خاص .
الخطوة 1 :
- انقر فوق Alt + F11 للدخول إلى وحدة comand.
- انسخ الكود التالي في وحدة الأوامر.
6693
الخطوة 2:
- قم بتشغيل الكود بالضغط على F5 .
هنا ، الصف 4 يتم نسخه إلى الصف 11 .
اقرأ المزيد: كيفية نسخ صفوف متعددة في Excel باستخدام ماكرو (4 أمثلة)
الخاتمة
في هذه المقالة ، أوضحنا 9 طرق VBA لصق القيم الخاصة والتنسيقات في Excel. آمل أن يرضي هذااحتياجاتك. يرجى إلقاء نظرة على موقعنا على الويب Exceldemy.com وإعطاء اقتراحاتك في مربع التعليقات.
