Création d'un PDF généré par excel ne marche pas en excel 2002

[absoluz]

Bonjour à tous !

quelqu'un connait il l'équivalent de ce bout de code pour imprimer des feuilles d'un classeur excel directement dans un fichier PDF mais pour excel 2002 ? ça marche super bien sur les versions suivantes mais pas sur la 2002 :

Sheets(MesFeuilles).Select

'Sauvegarde en pdf

Dossier = ActiveWorkbook.Path

NomFichier = InputBox("Quel nom voulez vous donner au fichier ? ce fichier sera stocké au même endroit que le fichier sur lequel vous travaillez", "Le nom" )

ActiveWorkbook.ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Dossier & "\" & NomFichier & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:= _
False


merci d'avance pour votre aide !!! 🙄

 

[absoluz]

Re : Création d'un PDF généré par excel ne marche pas en excel 2002

au pire si vous avez un bout de code qui selon la version d'excel contourne ce problème...😎

 

[Staple1600]

Re : Création d'un PDF généré par excel ne marche pas en excel 2002

Bonjour à tous

absoluz:
C'est normal que cela ne marche pas 😉
ExportAsFixedFormat Type=xlTypePDF n’apparaît qu'à partir d'Excel 2007!
Donc pour les versions antérieures il faut utiliser par exemple PDFCreator piloté par VBA.
(Tu trouveras en t'aidant de la loupe en haut à droite des discussions ou apparaissent des codes VBA faisant cela 😉 )