كيفية نسخ الصيغ إلى ورقة أخرى Excel VBA

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

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

ابدء

عند تسجيل ماكرو ، سيقوم Excel تلقائيًا بإنشاء التعليمات البرمجية لـ VBA التي يمكنك استخدامها لنسخ الإجراءات التي قمت بتسجيلها. يمكنك أيضًا كتابة التعليمات البرمجية لـ VBA يدويًا لتحقيق نفس النتائج. في هذه المقالة ، سنوضح لك كيفية القيام بالأمرين معًا.

تسجيل ماكرو

لتسجيل ماكرو ، اتبع الخطوات التالية:

1. افتح المصنف الذي يحتوي على الورقة بالصيغ التي تريد نسخها.

2. اضغط على زر "تسجيل ماكرو" في علامة التبويب "المطور". إذا كنت لا ترى علامة التبويب "المطور" ، فانقر هنا لمعرفة كيفية إضافتها.

3. أدخل اسمًا للماكرو الخاص بك واختر مفتاح الاختصار إذا رغبت في ذلك.

4. انقر فوق "موافق".

5. حدد الخلية التي تحتوي على الصيغة التي تريد نسخها.

6. اضغط على "Ctrl" + "C" لنسخ الخلية المحددة.

7. حدد الخلية حيث تريد لصق الصيغة المنسوخة.

8. اضغط على "Ctrl" + "V" للصق الصيغة المنسوخة.

9. اضغط على زر "إيقاف التسجيل" في علامة التبويب "المطور".

الماكرو الخاص بك جاهز الآن للاستخدام! لتشغيله ، ما عليك سوى الضغط على مفتاح الاختصار الذي قمت بتعيينه له ، أو النقر فوق الزر "وحدات الماكرو" في علامة التبويب "المطور" وحدد الماكرو الخاص بك من القائمة.

كتابة كود VBA يدويًا

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

1. افتح المصنف الذي يحتوي على الورقة بالصيغ التي تريد نسخها.

2. اضغط على "Alt" + "F11" لفتح محرر Visual Basic.

3. انقر فوق "إدراج"> "وحدة".

4. أدخل الرمز التالي في الوحدة النمطية:

صيغة Sub CopyFormula ()

مصدر خافت النطاق حسب النطاق

هدف خافتنطاق كمدى

قم بتعيين sourceRange = Range (“A1”) 'قم بتغيير A1 إلى خلية الصيغة الخاصة بك

قم بتعيين targetRange = Range ("B1") "قم بتغيير B1 إلى خلية اللصق المطلوبة

targetRange.Formula = sourceRange.Formula

End Sub

5. اضغط على "F5" لتشغيل الكود.

يجب الآن نسخ الصيغة الخاصة بك إلى الخلية المطلوبة!

تعديل الماكرو لنسخ الصيغ إلى ورقة أخرى

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

1. افتح المصنف الذي يحتوي على الورقة بالصيغ التي تريد نسخها.

2. اضغط على "Alt" + "F11" لفتح محرر Visual Basic.

3. انقر نقرًا مزدوجًا فوق الماكرو الخاص بك في القائمة الموجودة على الجانب الأيسر من الشاشة. سيظهر رمز الماكرو الخاص بك على الجانب الأيمن.

4. ابحث عن السطر التالي من التعليمات البرمجية:

قم بتعيين targetRange = Range ("B1") "قم بتغيير B1 إلى خلية اللصق المطلوبة

5. قم بتغيير "B1" إلى الخلية في الورقة الأخرى حيث تريد لصق الصيغة ، باستخدام هذا التنسيق: اسم الورقة! CellAddress. على سبيل المثال ، إذا كنت تريد لصق الصيغة في الخلية B2 على ورقة تسمى "Sheet2" ، فيمكنك تغيير الرمز إلى هذا:

تعيين targetRange = Sheets (“Sheet2”). Range (“B2”)

6. اضغط على "F5" لتشغيل الكود. يجب الآن نسخ الصيغة الخاصة بك إلى الورقة الأخرى!

افكار اخيرة

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

هذه هي نهاية البرنامج التعليمي.

اترك تعليقاً

كيفية تنزيل إصدارات ISO القديمة من نظام التشغيل Windows 10 (2026)

كيفية تنزيل إصدارات ISO القديمة من نظام التشغيل Windows 10 (2026)

لتنزيل ملف ISO قديم لنظام التشغيل Windows 10، افتح برنامج UUP Dump، وقم بتنزيل البرنامج النصي وتشغيله لإنشاء ملف ISO مخصص، واستخدم برنامج Rufus لإنشاء وسائط USB.

تثبيت نظام التشغيل Windows 11 بشكل نظيف على جهاز كمبيوتر Copilot+ (ARM64)

تثبيت نظام التشغيل Windows 11 بشكل نظيف على جهاز كمبيوتر Copilot+ (ARM64)

تثبيت نظام التشغيل Windows 11 بشكل نظيف على جهاز كمبيوتر ARM64 Copilot+، بما في ذلك إنشاء USB، ومسح محرك الأقراص، وإعادة تثبيت نظام التشغيل، وإنهاء الإعداد.

قم بتنزيل صورة الأرض من مهمة أرتميس 2 واجعلها خلفية شاشة جهازك على نظام التشغيل ويندوز 11

قم بتنزيل صورة الأرض من مهمة أرتميس 2 واجعلها خلفية شاشة جهازك على نظام التشغيل ويندوز 11

قم بتنزيل خلفية "Hello, World" من موقع NASA wallpaper لتعيينها كخلفيات لسطح المكتب على نظام التشغيل Windows 11.

كيفية إعادة إنشاء قسم الاسترداد لنظام التشغيل ويندوز 11

كيفية إعادة إنشاء قسم الاسترداد لنظام التشغيل ويندوز 11

لإعادة إنشاء قسم الاسترداد على نظام التشغيل Windows 11، يمكنك استخدام DiskPart مع نفس ملف winre.wim أو install.wim من الوسائط.

كيفية استنساخ قرص نظام التشغيل Windows 11 إلى قرص SSD أو NVMe أو HDD جديد باستخدام Clonezilla (مجاني)

كيفية استنساخ قرص نظام التشغيل Windows 11 إلى قرص SSD أو NVMe أو HDD جديد باستخدام Clonezilla (مجاني)

يتيح لك برنامج Clonezilla استنساخ تثبيت Windows 11 إلى قرص SSD أو HDD أو قرص صلب خارجي USB جديد مجانًا، وإليك الطريقة.

كيفية تنزيل ملف ISO لنظام التشغيل Windows 11 25H2

كيفية تنزيل ملف ISO لنظام التشغيل Windows 11 25H2

لتنزيل ملف ISO الخاص بنظام التشغيل Windows 11 25H2 للوصول إلى الميزات والتغييرات الجديدة، استخدم دعم Microsoft أو Insider أو UUP Dump أو الروابط المباشرة.

تحميل مباشر لملف ISO الخاص بنظام التشغيل Windows 11 25H2 tiny11 لأجهزة الكمبيوتر بمعالجات x64 و arm64

تحميل مباشر لملف ISO الخاص بنظام التشغيل Windows 11 25H2 tiny11 لأجهزة الكمبيوتر بمعالجات x64 و arm64

يمكنك الآن تنزيل ملف Windows 11 25H2 tiny11 ISO لأنظمة Intel و AMD (x64) و ARM (arm64) دون استخدام برنامج Tiny11Builder النصي.

كيفية إلغاء تثبيت متصفح مايكروسوفت إيدج على نظام التشغيل ويندوز 11

كيفية إلغاء تثبيت متصفح مايكروسوفت إيدج على نظام التشغيل ويندوز 11

لإلغاء تثبيت Microsoft Edge على نظام التشغيل Windows 11 أو 10، قم بتحرير IntegratedServicesRegionPolicySet واختر إلغاء التثبيت من إعدادات التطبيقات المثبتة.

كيفية إصلاح مشكلة تكرار العمليات في إدارة المهام على نظام التشغيل ويندوز 11

كيفية إصلاح مشكلة تكرار العمليات في إدارة المهام على نظام التشغيل ويندوز 11

يحتوي مدير المهام على العديد من الإصلاحات لمشكلة تكرار العمليات بعد الإغلاق في نظام التشغيل Windows 11، بما في ذلك استخدام taskkill و Registry و ViveTool.

كيفية تعطيل التحديثات التلقائية على نظام التشغيل ويندوز 11

كيفية تعطيل التحديثات التلقائية على نظام التشغيل ويندوز 11

لتعطيل التحديثات التلقائية على نظام التشغيل Windows 11، استخدم خيار "إيقاف مؤقت" في Windows Update أو "نهج المجموعة" لإيقافها نهائيًا. إليك الطريقة.