Powerpoint Save

TKT -  
Bonjour,
J ai une macro pour enregistrer mon ppt en pdf mais maintenant je veux enregistrer seulement différent slides

voila ma macro : 

Sub toPDF()
Dim opres As Presentation
Set opres = ActivePresentation
Dim strName As String
strName = Left(opres.Name, InStrRev(opres.Name, ".") - 1)
opres.SaveCopyAs FileName:=opres.Path & "\" & strName & Format(Date, "dd-mm-yyyy"), FileFormat:=ppSaveAsPDF
MsgBox "Saved as :" & opres.Path & "\" & strName & ".PDF"
End Sub

2 réponses

  2.  yg_be Contributeur
    bonjour, moi je supprimerais les slides que tu ne veux pas sauver, avant de faire le sauvetage.
    1. TKT
      Bonjour,

      En fait je veux garder tout mes slides , et créer plusieurs type d'enregistrement.
      Merci
    2. yg_be Contributeur
      @TKTeh bien, tu peux repartir chaque fois de ton document original, avec tous les slides.
      Ou bien créer une copie avant sauvetage vers PDF, supprimer des slides dans cette copie, sauver cette copie comme PDF, et recommencer ensuite.
      Je pense que tu peux aussi "imprimer vers PDF", cela te permettra peut-être mieux de choisir les slides.

Discussions similaires

Écran noir et problème « Power saving mode »
juantgo

39 réponses
Ecran pc "entering power save"
riirous

10 réponses
entering power save mode / problème alimentation
nobody

4 réponses
Faire un publipostage de EXCEL à POWER POINT
marionv

1 réponse