Avec Powerpoint 97, il n’existe aucune fonction pour obtenir simplement un pied de page indiquant le numéro de la diapositive accompagné du nombre total de vues d’une présentation. La seule option disponible permet d’insérer automatiquement le numéro de la diapositive (Affichage/En-tête et pied de page). Toutefois, à l’aide d’un programme en VBA, il est facile d’écrire une fonction dédiée à l’insertion du nombre total de vues. Cliquez sur Outils/Macro/Visual Basic Editor. Dans le menu Insertion, choisissez Module et saisissez le listing ci-dessous. Lorsque votre présentation est finie, exécutez la macro afin qu’elle modifie le pied de page de chacune des diapositives. N’oubliez pas de recommencer cette opération chaque fois que vous ajouterez ou supprimerez une vue.Listing :
Sub NBPage()
Dim nb, i As Integer
nb = ActivePresentation.slides.Count
For i = 1 To nb
With ActivePresentation.slides(i).HeadersFooters
.Footer.Text = ActivePresentation.slides(i).SlideNumber & ” / ” & nb
End With
Next i
End Sub
🔴 Pour ne manquer aucune actualité de 01net, suivez-nous sur Google Actualités et WhatsApp.
