Bonjour,

Je viens vers vous car j'ai un petit problème dans le classeur que je vous partage il y a une feuille dont je voudrais pouvoir enregistrer en pdf, il y a deux boutons le premier et pour enregistrer en PDF et le second pour imprimer mon problème vient du premier je nage je n'arrive pas à comprendre d'où vient le problème pouvez vous m'aider s'il vous plaît je vous en remercie d'avance.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub save_PDF()
Dim fichier As String
 
With Worksheets("EtiquettesTableau")
'adapter le nom sous lequel le fichier sera enregistré
fichier = "/Volumes/Boulot/logiciel/Etiquettes Tableaux" & Range("F22") & ".pdf"
'adapter le chemin du dossier
Dossier = "/Volumes/Boulot/logiciel/Etiquettes Tableaux."
Chemin = Dossier & fichier
.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End With
End Sub