XL 2016 Comment convertir et ouvrir au format pdf une feuille excel

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\users\xxx\desktop\yyy.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=True

Cliquez pour agrandir...

Wayki à dit:

Je me suis dit pourquoi pas avec un objet : j'ai juste réussi à faire boguer excel 😂
En revanche, si tu utilises ce code en adaptant la destination à ton environnement, ça marche par écrasement. Tu n'auras pas de doublons.

Cliquez pour agrandir...

GALOUGALOU à dit:

Bonjour jovial87 bonjour Wayki bonjour le forum
Au moment de poster je voie le fil de wayki, j'allais proposer la même macro à une virgule près.
Donc pour la virgule, je pose quand même.
ouvre un pdf sans enregistrement.

Code:

Sub imp_pdf()
  ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="nouveau pdf", Quality:=xlQualityStandard, _
                              IncludeDocProperties:=True, IgnorePrintAreas:=False, _
                              OpenAfterPublish:=True
End Sub

Amitiés wayki
cdt
galougalou

Cliquez pour agrandir...