Bonjour à tous,
Je souhaite sélectionner plusieurs feuilles Excel sauf 2 d'entre elles intitulées Feuil1 et Feuil2, puis créer un pdf comprenant toutes les feuilles sauf ces 2 citées.
J'ai écris ce code mais il ne fonctionne pas. Pourriez-vous me dire ce qui ne va pas ?
Merci par avance et bonne journée
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 ChDir "C:\Users\x\Desktop" For Each f In ThisWorkbook.Sheets If f.Name <> "Feuil1" And f.Name <> "Feuil2" Then f.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\x\Desktop\Fichier-V9.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ True End If Next End Sub
Partager