Comment randomiser les diapositives dans une présentation PowerPoint


Parfois, vous souhaiterez peut-être ajouter un élément de surprise à votre présentation PowerPoint en mélangeant les diapositives de manière aléatoire. Par exemple, vous créez peut-être une présentation pour vos élèves et souhaitez mélanger tout ou partie des flashcards.

Par défaut, PowerPoint ne dispose pas de fonctionnalité intégrée pour cela, mais vous pouvez y parvenir à l'aide d'une macro. Dans ce guide étape par étape, nous allons vous montrer comment mélanger manuellement les diapositives et comment utiliser un code VBA pour automatiser le processus de lecture aléatoire.

Comment mélanger manuellement les diapositives dans PowerPoint

Dans Microsoft PowerPoint, vous pouvez mélanger manuellement les diapositives de votre présentation pour les afficher dans un ordre aléatoire à l'aide de la vue « Trieuse de diapositives ». Bien que cette méthode ne soit pas aussi aléatoire que l'utilisation de macros, elle vous permet néanmoins de réorganiser les diapositives dans un ordre différent.

Pour mélanger et randomiser manuellement les diapositives d'une présentation PowerPoint, suivez les étapes ci-dessous.

  1. Ouvrez votre présentation PowerPoint et accédez à l'onglet Affichagedans le menu du ruban en haut de l'écran. Cliquez dessus pour accéder au menu Affichage.
    1. Dans le menu Affichage, recherchez le groupe Vues de présentation et sélectionnez l'option Trieur de diapositives. Cela fera basculer votre présentation vers la vue Trieur de diapositives, où vous pourrez voir toutes les miniatures des diapositives à la fois.
      1. Dans la vue Trieur de diapositives, vous pouvez voir des miniatures plus grandes des diapositives. Si votre présentation contient beaucoup de diapositives, cliquez sur l'option Zoom arrièrereprésentée par l'– icônedans la barre d'outils inférieure pour obtenir un meilleur aperçu de toutes les diapositives. Continuez à cliquer dessus jusqu'à ce que vous puissiez voir toutes les diapositives de la présentation à l'écran en même temps.
      2. Vous pouvez désormais facilement mélanger les diapositives en cliquant sur une diapositive et en la faisant glisser vers une position aléatoire sur l'écran. Répétez cette étape avec d'autres diapositives pour les mélanger de manière aléatoire. Continuez à réorganiser les diapositives jusqu'à ce que vous soyez satisfait du nouvel ordre.
      3. Gardez à l'esprit que cette méthode ne garantit pas un ordre complètement aléatoire, car cela dépend de votre disposition manuelle. Si vous souhaitez voir une diapositive complètement aléatoire apparaître après avoir appuyé sur le bouton pour afficher la diapositive suivante, vous pouvez utiliser la méthode des macros VBA pour un brassage aléatoire plus précis et automatisé..

        Comment randomiser des diapositives PowerPoint à l'aide d'un code VBA

        Pour vous assurer que vos diapositives PowerPoint sont lues dans un ordre complètement aléatoire, vous devrez utiliser un peu de codage. L'option Macros de Microsoft Office PowerPoint vous permet d'exécuter des codes VBA pour mélanger automatiquement les diapositives de votre présentation.

        Dans ce didacticiel, nous allons vous montrer comment mélanger vos diapositives sans doublons. Pour randomiser les diapositives dans PowerPoint afin que la même diapositive ne se répète pas, suivez les étapes ci-dessous.

        1. Pour commencer, vous devez accéder à l'onglet Développeurdu menu du ruban PowerPoint. Pour ce faire, suivez le chemin Fichier>Optionsou cliquez avec le bouton droit dans n'importe quel espace vide du menu du ruban et sélectionnez Personnaliser le ruban. Cela ouvrira une boîte de dialogue.
          1. Dans la boîte de dialogue Options PowerPoint, faites défiler vers le bas jusqu'à trouver l'option Développeur. Cochez la case à côté de Développeuret cliquez sur OK.
            1. Sélectionnez maintenant l'onglet Développeuret choisissez Macros. Dans la fenêtre contextuelle, vous pouvez insérer une nouvelle macro. Choisissez-lui un nom (par exemple, Shuffleslides) et cliquez sur Créerpour continuer.
              1. Cela ouvrira la fenêtre Visual Basic Editor, dans laquelle vous pourrez saisir le code pour randomiser vos diapositives de présentation PowerPoint.
                1. Copiez le code VBA suivant et collez-le dans la fenêtre Visual Basic ouverte.
                2. Sous Shuffleslides()

                  Première diapositive = 2

                  Dernière diapositive = 5

                  Randomiser

                  'générer un non aléatoire entre la première et la dernière diapositive'

                  GRN :

                  RSN = Int((LastSlide – FirstSlide + 1) * Rnd + FirstSlide)

                  Si RSN = ActivePresentation.SlideShowWindow.View.Slide.SlideIndex Alors GoTo GRN

                  ActivePresentation.SlideShowWindow.View.GotoSlide (RSN)

                  Fin de l'abonnement

                  1. Après avoir collé le code, vous remarquerez que le paramètre par défaut mélange les diapositives 2 à 5. Toutefois, votre présentation ne comporte peut-être pas exactement cinq diapositives, mais ce n'est pas un problème. Vous pouvez facilement personnaliser cette partie du code en fonction de vos besoins.
                  2. Dans l'éditeur VBA, ajustez les numéros de diapositives après « FirstSlide » et « LastSlide » pour spécifier la plage de diapositives que vous souhaitez inclure dans la lecture aléatoire. Par défaut, la lecture aléatoire commence à partir de la diapositive 2 pour éviter d'inclure la diapositive de titre. Si vous souhaitez exclure la lecture aléatoire des diapositives de titre, conservez « FirstSlide = 2 » tel quel..

                    Par exemple, disons que vous avez une présentation comportant dix diapositives et que vous souhaitez éviter de mélanger la diapositive de titre. Dans ce cas, définissez « FirstSlide = 2 » et « LastSlide = 10 ». De cette façon, seules les diapositives 2 à 10 seront incluses dans le processus de lecture aléatoire et votre diapositive de titre ne sera pas affectée.

                    1. Maintenant que vous avez terminé et personnalisé le code de votre présentation, il est temps de ajouter des boutons d'action accéder aux diapositives. Pour ce faire, insérez n'importe quelle forme sur la première diapositive (ou n'importe quelle diapositive de votre choix), puis sélectionnez la forme et accédez à Insérer>Action>Exécuter une macro. Choisissez ensuite la macro que vous venez de créer. Cela activera la lecture aléatoire de vos diapositives pendant le mode Diaporama, offrant ainsi une expérience attrayante à votre public.
                      1. Enregistrez votre fichier PowerPoint au format PPTM (présentation prenant en charge les macros) pour conserver les macros que vous avez créées. Sélectionnez Fichier>Enregistrer souset choisissez PPTM dans la liste déroulante pour vous assurer que les macros que vous avez créées seront préservées et non perdues.
                      2. Entrez maintenant dans le mode Présentation et cliquez sur le bouton de la première diapositive pour mélanger vos diapositives de manière aléatoire. Profitez de votre présentation dynamique et non répétitive.

                        Comment mélanger uniquement des diapositives paires ou impaires

                        Si vous souhaitez mélanger uniquement des diapositives spécifiques dans votre présentation, comme les diapositives paires ou impaires, vous pouvez utiliser le code VBA suivant pour randomiser uniquement les diapositives paires ou impaires sans perturber le reste.

                        Pour ce faire, suivez les étapes ci-dessus jusqu'à ce que vous arriviez à la fenêtre Visual Basic Editor et insérez le code suivant.

                        Sous Shuffleslides()

                        EvenShuffle = True (remplacer par false si seules les diapositives impaires sont mélangées)

                        FirstSlide = 2 (doit être un nombre pair/impair en fonction des besoins)

                        Dernière diapositive = 8

                        Randomiser

                        Pour i = FirstSlide To LastSlide Étape 2

                        Générer : « générer un non aléatoire entre la première et la dernière diapositive »

                        RSN = Int((LastSlide – FirstSlide + 1) * Rnd) + FirstSlide

                        Si EvenShuffle = True Alors

                        Si RSN Mod 2 = 1 Alors GoTo générer

                        Autre

                        Si RSN Mod 2 = 0 Alors GoTo générer

                        Terminer si

                        ActivePresentation.Slides(i).MoveTo (RSN)

                        Si i

                        Si i >RSN Alors ActivePresentation.Slides(RSN + 1).MoveTo (i)

                        Suivant je

                        End Sub

                        Comment mélanger vos diapositives dans une boucle sans fin

                        Le didacticiel ci-dessus montre comment mélanger des diapositives PowerPoint et les lire dans un ordre aléatoire sans répétition. Cependant, après une boucle, le même ordre de lecture aléatoire est conservé, sauf si vous mélangez à nouveau les diapositives.

                        Pour parcourir automatiquement toutes les diapositives dans une boucle sans fin pendant le mode diaporama avec un nouvel ordre aléatoire pour chaque boucle, vous pouvez utiliser le code suivant. Assurez-vous de modifier les chiffres après FirstSlide = et LastSlide = pour les adapter au nombre de diapositives de votre présentation.

                        Position publique, plage, AllSlides() sous forme d'entier

                        Sub ShuffleAndBegin()

                        Première diapositive = 2

                        Dernière diapositive = 6

                        Plage = (LastSlide – FirstSlide)

                        ReDim AllSlides (0 à la plage)

                        Pour i = 0 à la plage

                        Toutes les diapositives(i) = Première diapositive + i

                        Suivant je

                        Randomiser

                        Pour N = 0 à la plage

                        J = Int((Plage + 1) * Rnd)

                        temp = AllSlides(N)

                        Toutes les diapositives (N) = Toutes les diapositives (J)

                        AllSlides(J) = temp

                        N suivant

                        Position = 0

                        ActivePresentation.SlideShowWindow.View.GotoSlide AllSlides(Position)

                        Fin de l'abonnement

                        Sous-avance()

                        Position = Position + 1

                        Si Position >Plage Alors

                        ShuffleAndBegin

                        Autre

                        ActivePresentation.SlideShowWindow.View.GotoSlide AllSlides(Position)

                        Fin si

                        Fin du sous-titre

                        Il est temps de commencer votre présentation

                        Vous savez désormais comment mélanger des diapositives PowerPoint comme un pro. Expérimentez ces méthodes et créer des présentations attrayantes pour les enseignants, les professionnels ou tout autre scénario nécessitant un ordre de diapositives aléatoire. Amusez-vous avec vos diaporamas dynamiques et captivants.

                        .

                        Articles Similaires:


                        9.09.2023