Voici le code qui enregistrera l’intégralité de votre classeur au format PDF dans le dossier spécifié. Ce code enregistrera l’intégralité du classeur au format PDF.
Sub SaveWorkshetAsPDF() ThisWorkbook.ExportAsFixedFormat xlTypePDF, "C:UsersSumitDesktopTest" & ThisWorkbook.Name & ".pdf" End Sub
Vous devrez changer l’emplacement du dossier pour utiliser ce code.