Comment combiner plusieurs présentations PowerPoint

Quand beaucoup de gens travaillent sur plusieurs Présentations PowerPoint et puis besoin de les fusionner à la fin, cela devient difficile. La raison principale est la mise en forme. Si les équipes ne sont pas synchronisées les unes avec les autres, il deviendra un travail pénible de les amener au même format.

Microsoft PowerPoint propose une solution interne tout comme Word et Excel, qui vous permettra de fusionner plusieurs présentations PowerPoint tout en conservant la mise en forme intacte. La bonne façon de faire est de demander à tout le monde d'utiliser le même thème. Assurez-vous de configurer le thème PowerPoint dans un fichier, puis partagez-le avec tout le monde.

Comment fusionner plusieurs présentations PowerPoint

Nous avons trois façons de fusionner plusieurs fichiers PowerPoint. Alors que le premier est bon lorsque vous avez moins de nombres, et que la préservation de la mise en forme est l'objectif principal. Le second peut combiner n'importe quel nombre de fichiers disponibles dans un dossier.

1. Méthode de réutilisation des diapositives
2. Méthode de code VBA
3. Copier Coller Diapositives.

Chaque méthode a son avantage et son inconvénient. Choisis sagement.

1] Méthode de réutilisation des diapositives

Microsoft PowerPoint propose un outil intégré- Réutiliser les diapositives. Il vous permet d'importer une ou plusieurs diapositives dans votre présentation à partir d'une autre, sans avoir à ouvrir l'autre fichier. Lorsque vous utilisez cette option, assurez-vous de choisir l'option de formatage, surtout si vous souhaitez avoir le même thème que le fichier source.

1. Ouvrez un nouveau fichier Powerpoint ou un fichier existant dans lequel vous souhaitez fusionner les diapositives.
2. Sélectionnez la diapositive après laquelle vous souhaitez insérer les diapositives du fichier source.
3. Aller à Accueil > Nouvelle diapositive > Réutiliser la diapositive.
4. Parcourir pour sélectionner le fichier que vous souhaitez fusionner. Cliquez ensuite sur le bouton fléché.
5. Il révélera tous les côtés disponibles sur cette diapositive.
6. Cliquez sur la diapositive que vous souhaitez insérer et elle sera instantanément ajoutée à la diapositive.
7. Si vous souhaitez conserver le format exactement comme la diapositive source, cochez la case qui dit : "Conserver le formatage de la source."

Toute diapositive que vous ajoutez ici est une copie. Le fichier source reste intact et aucune modification ne lui sera apportée. Toute modification apportée au document fusionné ne sera pas disponible dans le fichier d'origine.

L'une des meilleures parties de l'importation à l'aide de cette méthode est que il gardera toutes les animations ou transitions. Ce n'était pas le cas auparavant, et il fallait utiliser la méthode Object, suivie de plusieurs configurations pour que cela fonctionne. La méthode d'objet n'est utile que si vous souhaitez regrouper plusieurs fichiers en un seul.

2] Méthode de code VBA

Puisqu'il n'y a pas de méthode native pour fusionner de nombreuses présentations PowerPoint, nous devrons utiliser un code VBA, tout comme nous l'avons fait pour fusionner des fichiers Excel. Il est simple et fonctionne mieux par rapport au code VBA que nous avons utilisé pour Excel. Le code a bien fonctionné pour moi et j'ai pu fusionner 3 fichiers PowerPoint d'une valeur de 60 diapositives.

Dans le fichier PowerPoint nouveau ou existant dans lequel vous souhaitez fusionner toutes les présentations, appuyez sur ALT + F11

Cliquez sur Insertion > Module et collez le code à l'intérieur de ce module. Ne vous embêtez pas à l'enregistrer.

Sub InsertAllSlides() ' Insérer toutes les diapositives de toutes les présentations dans le même dossier que celui-ci ' DANS celui-ci ; n'essayez pas d'insérer CE fichier dans lui-même, cependant. Dim vArray() As String Dim x As Long ' Changer "*.PPT" à "*.PPTX" ou autre si nécessaire : EnumerateFiles ActivePresentation.Chemin & "C:\PathtoSlidesYouWanttoImport", "*.PPT", vArray With ActivePresentation For x = 1 To UBound(vArray) If Len(vArray(x)) > 0 Then .Diapositives.InsérerFromFile vArray(x), .Diapositives.Count End If Next End With End Sub Sub EnumerateFiles(ByVal sDirectory As String, _ ByVal sFileSpec As String, _ ByRef vArray As Variant) ' collecte tous les fichiers correspondant à la spécification du fichier dans vArray, un tableau de chaînes Dim sTemp As String ReDim vArray( 1 à 1) sTemp = Dir$(sDirectory & sFileSpec) Do While Len(sTemp) > 0 ' PAS le "vaisseau-mère"… présentation actuelle Si sTemp <> ActivePresentation.Name Then ReDim Preserve vArray(1 To UBound(vArray) + 1) vArray(UBound(vArray)) = sDirectory & sTemp End If sTemp = Dir$ Loop End Sub

Apportez les modifications que j'ai marquées en gras.

Appuyez sur F5, et il exécutera le code

Il importera toutes les diapositives de tous les fichiers disponibles dans ce dossier. Cependant, il perdra la mise en forme. C'est le plus gros problème avec le code, mais il peut fusionner n'importe quel nombre de fichiers, ce qui est son avantage le plus important.  Assurez-vous de supprimer le code VBA une fois l'importation terminée. Le code est par PPTFAQ.c0m.

3] Copier coller des diapositives

Je l'utilise parfois lorsqu'il y a plusieurs fichiers, généralement moins de trois, et je n'ai besoin d'en copier que quelques diapositives. Alors que vous pouvez utiliser Ctrl + C et Ctrl + V, mais vous perdrez la mise en forme. Ainsi, après avoir copié la diapositive, cliquez avec le bouton droit sur la section de la liste des diapositives du fichier de destination et sélectionnez conserver le format.

J'espère que toutes ces méthodes étaient faciles à suivre et que vous avez pu fusionner plusieurs fichiers PowerPoint.

Assurez-vous de choisir entre le nombre de fichiers à fusionner et le thème de la diapositive selon votre besoin.

Lire la suite: Comment fusionner des documents Word.