Bonjour à tous
Depuis la grosse mise à jour Windows 10 de cette semaine, mon code save as PDF ne fonctionne plus très bien.
La première fois il m'ouvre une fenêtre pour choix le l'imprimante.
Une fois choisi je peut exporter sans problème.
Avez-vous déjà eu ce bug?
Merci beaucoup pour votre temps
On Error GoTo GestErreur
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\Temjeh\Desktop\" & Sheets("Print").Range("H10") & Sheets("Print").Range("I10").Text & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
Cancel = True
MsgBox "Création de la facture no " & Sheets("Print").Range("I10").Text & " en PDF réussis"
Sheets("Factures").Activate
Exit Sub
GestErreur:
Temjeh
Depuis la grosse mise à jour Windows 10 de cette semaine, mon code save as PDF ne fonctionne plus très bien.
La première fois il m'ouvre une fenêtre pour choix le l'imprimante.
Une fois choisi je peut exporter sans problème.
Avez-vous déjà eu ce bug?
Merci beaucoup pour votre temps
On Error GoTo GestErreur
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\Temjeh\Desktop\" & Sheets("Print").Range("H10") & Sheets("Print").Range("I10").Text & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
Cancel = True
MsgBox "Création de la facture no " & Sheets("Print").Range("I10").Text & " en PDF réussis"
Sheets("Factures").Activate
Exit Sub
GestErreur:
Temjeh
Dernière édition: