Bonjour,
Je cherche à enregistrer des graphs réalisés sous excel dans un fichier PDF. Voici mon code :
La réalisation se passe bien mais par contre le fichier pdf n'est pas enregistré dans mon repertoire et je ne comprend pas pourquoi. Il faut ajouter un bout de code pour cela?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Const sheGraphique1 As String = "Feuil1" Const sheGraphique2 As String = "Feuil2" Sheets(Array(sheGraphique1, sheGraphique2)).Select ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "Test.pdf" _ , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _ :=False, OpenAfterPublish:=True
Merci de votre aide
Partager