آخر تحديث: يونيو 2020
ينطبق على: Office 2019 وما فوق. نوافذ فقط.
هذا سؤال من القارئ:
كجزء من عرض تقريري الفصلي للإدارة ، غالبًا ما أحتاج إلى نسخ عدة شرائح معلومات عامة من عروض تقديمية أخرى. ليست مشكلة كبيرة ، ولكنها ستكون مدخرًا كبيرًا أن تكون قادرًا على أتمتة هذا التمرين. أي VBA ماكرو يساعد على تحقيق ذلك هو موضع تقدير!
كما ذكرت للتو ، يمكنك أتمتة نسخ الشرائح ولصقها في PowerPoint باستخدام Visual Basic for Applications. إذا كنت بحاجة إلى إنشاء العديد من العروض التقديمية كل شهر ، فقد تصبح أتمتة نسخ / استيراد الشرائح هذه توفيرًا كبيرًا للوقت!
PowerPoint VBA لإضافة الشرائح
لنبدأ في هذا التمرين البسيط.
أولاً ، تأكد من تمكين علامة تبويب التطوير الخاصة بك ومرئية. إليك كيفية القيام بذلك .
سأفترض أنك قمت بالفعل بإنشاء عرض تقديمي ممكّن لماكرو (نوع الملف هو .pptm) ، والذي قمت بوضعه في نفس الدليل من العرض التقديمي المصدر (والذي سأشير إليه باسم source.pptm). فيما يلي كيفية إنشاء عرض PowerPoint تقديمي باستخدام VBA .
أولاً ، دعنا نأخذ نسخة احتياطية من هذا العرض التقديمي (نسخة بسيطة وحفظ).
ثم دعنا نمضي قدمًا ونقوم بإدراج الماكرو التالي في وحدة VBA النمطية الجديدة في العرض التقديمي الوجهة. يمكن العثور على جميع التفاصيل حول كيفية القيام بذلك في برنامج PowerPoint VBA التعليمي الخاص بنا .
إليك رمز VBA الذي ستحتاجه لنسخ الشرائح ولصقها تلقائيًا.
زوجان من الافتراضات التي قدمتها:
Sub InsertFromOtherPres()
' This short VBA macro copies slides from one presentation and inserts them into another
ActivePresentation.Slides.InsertFromFile FileName:="source.pptm", Index:=1, SlideStart:=2,
SlideEnd:=4
End Sub
من الواضح ، لا تتردد في تغيير فهرسة رقم الشريحة في الكود حتى يتناسب مع متطلباتك.
يمكنك جعلها تتكرر خلال عدة عروض تقديمية وإدراج شرائح محددة من كل منها في تقرير الإدارة الخاص بك.
PowerPoint VBA لتكرار الشرائح
بدلاً من نسخ الشرائح إلى عرض تقديمي آخر ، قد ترغب في استنساخ شريحة واحدة أو أكثر في عرضك التقديمي:
Sub CopySlides()
' Short snippet to duplicate the third slide in a presentation, change the index/es accrodingly
ActivePresentation.Slides(3).Duplicate
End Sub
كان هذان مجرد مثالين بسيطين لأتمتة PowerPoint. القراء الذين يبحثون عن أسئلة محددة ، لا تتردد في إرسال استفسار عبر صفحة الاتصال.
أتمنى أن يساعد 🙂
كانت المشكلة في المثال السابق هي أنه لم يتم نسخ تنسيق سمة العروض التقديمية الأصلية. افترض أن الورقتين لهما تنسيق مختلف، وهذا ما كان سيحدث:
مثال 1
|
|
هذا هو العرض التقديمي مع الشريحة التي نريد نسخها:
النتيجة:
للتغلب على هذه المشكلة، يمكنك استخدام الكود أدناه:
|
|
بالإضافة إلى نسخ الشريحة، يقوم الكود أعلاه بنسخ التصميم. إذا أردت القيام بذلك يدويًا، فستقوم بنسخ شريط التمرير إلى العرض التقديمي الجديد. لا يمكنك نسخ مدير الشرائح باستخدام VBA ولكن بدلاً من ذلك يمكنك تعيين خاصية التصميم للشرائح.
استخدم نموذج استراتيجية التسويق القابل للطباعة المكون من صفحة واحدة لاختيار الجمهور المحلي، والعرض، ومزيج القنوات، والميزانية، والإجراءات، والأهداف القابلة للقياس.
Build a free employee shift schedule in Excel with start/end times, break deductions, overnight-shift handling, weekly totals, and a simple hours calculator.
قارن بين أفضل تطبيقات الفواتير المجانية لشركات الخدمات الأمريكية في عام 2026، بما في ذلك Zoho Invoice وSquare وWave وPayPal وInvoice Ninja.
Build a simple bi-weekly payroll tracker in Excel for a small team, with clear sheets, formulas, checks, and practical limits for safe payroll reconciliation.
تعرف على كيفية تصدير جهات اتصال Salesforce إلى ملف Excel نظيف، والحفاظ على المعرفات وحقول النصوص، وإزالة التكرارات بأمان، وتجنب أخطاء CSV الشائعة.
قم بإنشاء تقدير تكلفة قابل للطباعة لمشروع بناء في برنامج Excel مع فئات تكلفة عملية، وصيغ، وحقول علامات، وإعدادات طباعة، وقائمة مرجعية جاهزة للمقاول.
استخدم قائمة التحقق القابلة للطباعة لتخطيط الفعاليات وقالب الميزانية في Word لتتبع المسؤولين، والمواعيد النهائية، والتكاليف، والموردين، وجاهزية يوم الفعالية مع فحوصات جودة واضحة.
أصلح معادلات Excel التي لا تُحتسب تلقائيًا في ثلاث خطوات: استعادة وضع الحساب، فرض إعادة الحساب، وإصلاح المعادلات المنسقة كنص.
استخدم جدول التنظيف الأسبوعي القابل للطباعة هذا لاستضافة Airbnb لتنظيم عمليات التبديل، والتنظيف الدوري، وإعادة التخزين، والفحوصات، والتسليم من Word إلى PDF.
أنشئ سجل صيانة معدات عمليًا في Excel لمديري الورش، يتضمن معرفات الأصول، سجل الخدمة، مواعيد الاستحقاق، ضوابط الحالة، تتبع التوقف عن العمل، وقائمة تدقيق نهائية.
