Recherche

Avec une macro. La macro suivante va enregistrer dans le même dossier que le fichier PowerPoint chaque slide de la présentation, avec comme noms "Slide" suivis d'un numéro. Vous pouvez bien entendu changer ce nom.

Sub ExportPDF()
    Dim i As Integer
    Dim chemin As String
    chemin = ActivePresentation.Path & "\"

    For i = 1 To ActivePresentation.Slides.Count
        ActivePresentation.Slides(i).Copy
        With Presentations.Add(WithWindow:=msoFalse)
            .Slides.Paste
            .SaveAs chemin & "Slide" & i & ".pdf", ppSaveAsPDF
            .Close
        End With
    Next i
End Sub

Statistiques

France 75,6% France
Canada 8,1% Canada
États-Unis d'Amérique 4,8% États-Unis d'Amérique

Total:

64

Pays
018273552
Aujourd'hui: 7
Hier: 93
Cette semaine: 658
Semaine dernière: 1.156
Ce mois: 1.814