Insérer une barre de progression sous PowerPoint

Dernière mise à jour le par bjour .


INSERER UNE BARRE DE PROGRESSION

Pour permettre de visualiser l'avancement d'un exposé, une barre de progression peut être affichée en bas du diaporama.

Comment procéder:

Une fois le diaporama réalisé, allez dans Outils, Macro et Visual Basic Editor.
Dans la nouvelle fenêtre, allez dans Insertion, Module puis recopiez le texte suivant dans la page blanche :

Sub AddProgressBar()   
    On Error Resume Next   
        With ActivePresentation   
              For X = 1 To .Slides.Count   
              .Slides(X).Shapes("PB").Delete   
              Set s = .Slides(X).Shapes.AddShape(msoShapeRectangle, _   
              0, .PageSetup.SlideHeight - 12, _   
              X * .PageSetup.SlideWidth / .Slides.Count, 12)   
              s.Fill.ForeColor.RGB = RGB(127, 0, 0)   
              s.Name = "PB"   
              Next X:   
        End With   
End Sub

Allez ensuite dans Fichier, Fermer et retourner à Microsoft PowerPoint.
Maintenant revenu dans la page normale de PowerPoint, allez dans:
Outils, Macro, Macros, sélectionnez ensuite AddProcessBar puis cliquez sur Exécuter .

Résultat

Au final, la barre ressemble à cela :

Cet article est régulièrement mis à jour par des experts sous la
direction de Jean-François Pillou, fondateur de CommentCaMarche.
A voir également
Ce document intitulé « Insérer une barre de progression sous PowerPoint » issu de Comment Ça Marche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.