Bonjour,
Je me permets de solliciter votre aide, en espérant être clair, je voudrais depuis mon programme VBA quand je selectionne sur une valeur de ma liste déroulante que mon programme VBA ouvre une page internet qui est en fait une page au format PDF, puis imprime ce PDF.

Voilà le code que j'ai généré :
'Quand on clique sur le bouton valider, les documents utils correspondants à la ligne séléctionnée s'ouvre et sont imprimés

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub BoutonValid_Click()
    Dim IE As New InternetExplorer
    'Indique une valeur par defaut pour la listbox, -1 signifie qu'aucune ligne n'a été selectionne
    Select Case ListeDeroulante.ListIndex
        Case Is = -1
            MsgBox "Veuillez séléctionner une ligne", vbCritical, "erreur"
            Exit Sub
        Case Is = 0
            'Chargement de la page internet
            IE.navigate "nom du site internet donnant un pdf"
            'Affichage de la fenetre
            IE.Visible = True
            ' quitte la page
            IE.Quit
 
       Case Is = 1
            'Ouverture de la page internet
            Workbooks.Open ("nom du site internet donnant un pdf")
            'Imprime le classeur
            'ActiveWorkbook.PrintOut
            'Referme le classeur
            ActiveWorkbook.Close
    End Select
 
    ' Cacher le formulaire courant
    Me.Hide
End Sub
Comme vous pouvez le voir j'ai d'une part essayé avec la solution d'internet explorer; le probleme avec cette solution c'est que je n'arrive pas à imprimer et avec la solution Worbooks.Open, VBA me génére le code html, alors que je voudrais tout le PDF...

Merci de votre aide.