Excel - PowerPoint

Bonjour à tous,

J'ai un fichier Excel avec une liste de formations dans une colonne 'A8:A108'

Dans la colonne B "Catalogue" j'ai juste oui ou non

J'ai un fichier Powerpoint pour chaque formation (Donc 100)

Ce que j'aimerai c'est si dans la colonne "Catalogue" il y a oui, récupérer pour chaque ligne le PPT spécifique pour le regrouper dans un seul fichier PowerPoint et l'imprimer en PDF.

Si quelqu'un à une solution ?

Merci d'avance

Christian

Bonjour,

Sans utiliser VBA, il vous faut :

• Créer un diaporama personnalisé (menu Diaporama / Diaporama personnalisé).
• Choisir les diapos avec le liste à liste.
• Editer le diaporama personnalisé avec votre imprimante pdf après l'avoir sélectionné dans la partie Paramètres :

Oui j’ai vu mais ça ne répond pas vraiment à ma question

A partir d'Excel, après avoir créé une instance Powerpoint, il vous faudra :

• Récupérer les SlideID de vos slides dans votre fichier Excel
• Charger une variable tableau avec les numéros SlideID que vous aurez sélectionnés via une boucle
• Instancier une variable NamedSlideShow et créer un diaporama personnalisé. La numérotation des SlideID n'a rien à voir avec les numéros de diapo. Le code ci-dessous est un code PowerPoint, il faut l'adapter pour Excel.

Sub Test()

Dim I As Integer
Dim PptEnCours As Presentation
Dim SlidePersonnalise As NamedSlideShow
Dim MesNumeros As Variant

    Set PptEnCours = ActivePresentation

  '  With PptEnCours
  '     For I = 1 To .Slides.Count
  '         Debug.Print .Slides(I).SlideID
  '     Next I

  '  End With

    MesNumeros = Array(256, 259, 257, 264, 265) ' Exemple

    With PptEnCours
         Set SlidePersonnalise = .SlideShowSettings.NamedSlideShows.Add("Perso 1", MesNumeros)

    End With
    Set PptEnCours = Nothing: Set SlidePersonnalise = Nothing

End Sub

• Imprimer votre diaporama comme indiqué plus haut.