كيفية دمج عدة عروض بوربوينت في عرض واحد

عندما يعمل الكثير من الأشخاص على عروض PowerPoint التقديمية(PowerPoint presentations) المتعددة ثم يحتاجون إلى دمجها في النهاية ، يصبح الأمر صعبًا. السبب الرئيسي هو التشكيل. إذا لم تكن الفرق متزامنة مع بعضها البعض ، فسيكون من الصعب إحضارهم إلى نفس التنسيق.

يقدم Microsoft PowerPoint(Microsoft PowerPoint) حلاً داخليًا تمامًا مثل Word و Excel ، والذي سيسمح لك بدمج عروض PowerPoint التقديمية المتعددة ، مع الحفاظ على التنسيق كما هو. الطريقة الصحيحة للقيام بذلك هي أن تطلب من الجميع استخدام نفس الموضوع. تأكد(Make) من إعداد سمة PowerPoint(PowerPoint Theme) في ملف واحد ، ثم مشاركتها مع الجميع.

كيفية دمج عروض بوربوينت متعددة(Multiple PowerPoint)

لدينا ثلاث طرق لدمج ملفات PowerPoint متعددة. (PowerPoint)بينما يكون الخيار الأول جيدًا عندما يكون لديك عدد أقل من الأرقام ، إلا أن الحفاظ على التنسيق هو الهدف الأساسي. يمكن أن يجمع الثاني أي عدد من الملفات المتاحة في مجلد.

  1. إعادة استخدام طريقة الشرائح
  2. طريقة كود VBA
  3. نسخ ولصق الشرائح.

كل طريقة لها ميزتها وعيوبها. اختر(Choose) بحكمة.

1] إعادة استخدام طريقة الشرائح

كيفية دمج عروض بوربوينت متعددة

يقدم Microsoft PowerPoint(Microsoft PowerPoint) أداة مضمنة - إعادة استخدام الشرائح. (Reuse Slides.)يسمح لك باستيراد شرائح مفردة أو متعددة إلى عرضك التقديمي من أخرى ، دون الحاجة إلى فتح الملف الآخر. عند استخدام هذا الخيار ، تأكد من تحديد خيار التنسيق ، خاصة إذا كنت تريد أن يكون لديك نفس نسق الملف المصدر.

  1. افتح ملف Powerpoint جديدًا أو ملفًا موجودًا حيث تريد دمج الشرائح.
  2. حدد الشريحة التي تريد إدراج الشرائح بعدها من الملف المصدر.
  3. انتقل إلى Home > New Slide > Reuse Slide.
  4. تصفح(Browse) لتحديد الملف الذي تريد دمجه. ثم اضغط على زر السهم.
  5. سيكشف عن جميع الجوانب المتاحة في تلك الشريحة.
  6. انقر فوق(Click) الشريحة التي تريد إدراجها ، وستتم إضافتها على الفور إلى الشريحة.
  7. إذا كنت تريد الاحتفاظ بالتنسيق تمامًا مثل الشريحة المصدر ، فحدد المربع الذي يقول ، " الاحتفاظ بتنسيق المصدر(Keep source formatting) ".

أي شريحة تضيفها هنا هي نسخة. يظل الملف المصدر كما هو ، ولن يتم إجراء أية تغييرات عليه. لن يتوفر أي تغيير تقوم بإجرائه في المستند المدمج في الملف الأصلي.

أحد أفضل أجزاء الاستيراد باستخدام هذه الطريقة هو أنه سيحتفظ بجميع الحركات أو الانتقالات. (it will keep all animations or transitions.)لم يكن الأمر كذلك في وقت سابق ، واضطر المرء إلى استخدام طريقة الكائن(use the Object method) ، متبوعة بتكوينات متعددة لجعلها تعمل. طريقة الكائن(Object Method) مفيدة فقط إذا كنت تريد حزم عدة ملفات في ملف واحد.

2] طريقة كود VBA

نظرًا لعدم وجود طريقة أصلية لدمج العديد من عروض PowerPoint التقديمية(PowerPoint Presentations) ، فسيتعين علينا استخدام رمز VBA ، تمامًا كما فعلنا لدمج ملفات Excel . إنه مستقيم للأمام ويعمل بشكل أفضل مقارنة برمز VBA الذي استخدمناه لبرنامج Excel . عملت الكود بشكل جيد بالنسبة لي ، وتمكنت من دمج 3 ملفات PowerPoint بقيمة 60 شريحة.

دمج العروض التقديمية المتعددة باستخدام رمز VBA

في ملف PowerPoint(PowerPoint) الجديد أو الموجود حيث تريد دمج جميع العروض التقديمية ، اضغط على ALT + F11

انقر فوق (Click)Insert > Module ولصق الرمز داخل تلك الوحدة . لا تهتم بحفظه.

Sub InsertAllSlides()
'  Insert all slides from all presentations in the same folder as this one
'  INTO this one; do not attempt to insert THIS file into itself, though.

    Dim vArray() As String
    Dim x As Long

    ' Change "*.PPT" to "*.PPTX" or whatever if necessary:
    EnumerateFiles ActivePresentation.Path & "C:\PathtoSlidesYouWanttoImport", "*.PPT", vArray

    With ActivePresentation
        For x = 1 To UBound(vArray)
            If Len(vArray(x)) > 0 Then
                .Slides.InsertFromFile vArray(x), .Slides.Count
            End If
        Next
    End With

End Sub

Sub EnumerateFiles(ByVal sDirectory As String, _
    ByVal sFileSpec As String, _
    ByRef vArray As Variant)
    ' collect all files matching the file spec into vArray, an array of strings

    Dim sTemp As String
    ReDim vArray(1 To 1)

    sTemp = Dir$(sDirectory & sFileSpec)
    Do While Len(sTemp) > 0
        ' NOT the "mother ship" ... current presentation
        If sTemp <> ActivePresentation.Name Then
            ReDim Preserve vArray(1 To UBound(vArray) + 1)
            vArray(UBound(vArray)) = sDirectory & sTemp
        End If
        sTemp = Dir$
    Loop

End Sub

قم بإجراء التغييرات التي ميزتها بالخط العريض.

اضغط على F5(Press F5) ، وسوف يقوم بتنفيذ الكود

سيقوم باستيراد جميع الشرائح من جميع الملفات المتوفرة في هذا المجلد. ومع ذلك ، سوف تفقد التكوين. هذه هي أكبر مشكلة في الكود ، لكن يمكنه دمج أي عدد من الملفات ، وهي أهم ميزة له.  تأكد(Make) من إزالة رمز VBA بمجرد اكتمال الاستيراد. الكود هو PPTFAQ.c0m.(by PPTFAQ.c0m.)

3] نسخ ولصق الشرائح

الاحتفاظ بتنسيق المصدر عرض PowerPoint التقديمي

أستخدم هذا أحيانًا عندما يكون هناك عدة ملفات ، عادةً أقل من ثلاثة ، وأحتاج إلى نسخ بضع شرائح منها فقط. بينما يمكنك استخدام Ctrl + C و Ctrl + V ، لكنك ستفقد التنسيق. لذلك بعد نسخ الشريحة ، انقر بزر الماوس الأيمن فوق قسم قائمة الشرائح في الملف الوجهة وحدد الاحتفاظ بالتنسيق.

آمل أن تكون كل هذه الطرق سهلة المتابعة ، وقد تمكنت من دمج ملفات PowerPoint متعددة.(PowerPoint)

تأكد(Make) من الاختيار بين عدد الملفات المراد دمجها وموضوع(Theme) الشريحة حسب حاجتك.

اقرأ التالي(Read next) : كيفية دمج مستندات Word(How to Merge Word Documents) .



About the author

أنا خبير في أمان الكمبيوتر ولدي أكثر من 10 سنوات من الخبرة ، متخصص في تطبيقات Windows والملفات. لقد كتبت و / أو راجعت مئات المقالات حول مواضيع مختلفة تتعلق بأمن الكمبيوتر ، مما يساعد الأفراد في البقاء بأمان عبر الإنترنت. أنا أيضًا مستشار ذو خبرة للشركات التي تحتاج إلى مساعدة في حماية أنظمتها من انتهاكات البيانات أو الهجمات الإلكترونية.



Related posts