Macro pour imprimer en PDF plusieurs onglets

Bonjour à tous,

Je débute en macro et je dois pour mon travail, créer une macro pour que lorsque l'on appuie sur un bouton, certains onglets de mon fichier Excel face un PDF à enregistrer sur l'ordinateur.

J'ai pu créer le bouton et reste à créer la macro à rattacher au bouton mais je ne trouve rien qui fonctionne :-(

Voici le nom des onglets à prendre en compte par la macro :

SZ1

Fiche pour logistique

Annexe1

Annexe 2

Annexe 3

Annexe 4

Annexe 5

Annexe 6

Pouvez-vous m'aider? Je galère vraiment.

Merci par avance.

Bonjour et

chemin = "C:\...\Ceslesteb\...\"
Fichier = "Export PDF Macro"

ThisWorkbook.Sheets(Array("SZ1","Fiche pour logistique", "Annexe1","Annexe2","Annexe3","Annexe4","Annexe5","Annexe6")).Select
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=chemin & Fichier & ".PDF"

A tester apres lui avoir défini le chemin ou tu souhaites exporter ton PDF et son nom.

A+

Tu peux utiliser l'enregistrement de macro et faire ce que tu souhaites (selection des feuilles + Fichier Exporter PDF)
Arret de l'enregistrement et comprendre le code

image
Rechercher des sujets similaires à "macro imprimer pdf onglets"