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 72,8% France
Canada 7,8% Canada
États-Unis d'Amérique 3,9% États-Unis d'Amérique

Total:

102

Pays
018295765
Aujourd'hui: 40
Hier: 228
Cette semaine: 1.428
Semaine dernière: 1.699
Ce mois: 268