Demande d'adaptation
Fermé
kevin
-
19 févr. 2016 à 22:49
tyranausor Messages postés 3545 Date d'inscription jeudi 6 août 2009 Statut Membre Dernière intervention 1 avril 2022 - 20 févr. 2016 à 00:23
tyranausor Messages postés 3545 Date d'inscription jeudi 6 août 2009 Statut Membre Dernière intervention 1 avril 2022 - 20 févr. 2016 à 00:23
A voir également:
- Demande d'adaptation
- Adaptation intelligente de la vitesse - Accueil - Guide protection
- ORA-12560 : TNS erreur d'adaptation de protocole - Forum Oracle
- Partition gratuite let it be ou adaptation pi - Forum Loisirs / Divertissements
1 réponse
tyranausor
Messages postés
3545
Date d'inscription
jeudi 6 août 2009
Statut
Membre
Dernière intervention
1 avril 2022
2 033
20 févr. 2016 à 00:23
20 févr. 2016 à 00:23
Bonjour, voici un code tout fait, à toi de l'adapter
Sub Enreg_Pdf()
'
'Macro Enreg_Pdf()
'Enregistre la feuille Archives du classeur en pdf. Nécessite une imprimante virtuelle comme PDFCreator.
'
'
activeworkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"nomdufichier.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
From:=1, To:=1, OpenAfterPublish:=True
End Sub