no save
Assistance
Achat
News

FAQ | Powerpoint

Insérer une barre de progression sous PowerPoint
Publié par dogfriend, dernière mise à jour mar. 17 nov. 2009 à 18:45:54 par marlalapocket

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.
Voici comment procéder:
Une fois le diaporame 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 :

[.commentcamarche.net/faq/images/7737-ccm-2.png ]
Version Web
Réalisé par RedShift
no save