XL 2010 annuler impression sans blocage macro

gh4

XLDnaute Occasionnel
bonjour a tous,
dans mon prog je lance une impression pdf. par
Application.ActivePrinter = "Microsoft Print to PDF sur Ne03:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="Microsoft Print to PDF sur Ne03:", PrintToFile:=True, Collate:=True
la boite de dialogue Windows s'affiche "enregistrer" "annuler"
si je clique sur "Annuler" le prog se bloque sur
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="Microsoft Print to PDF sur Ne03:", PrintToFile:=True, Collate:=True
avez vous une idée pour contourner ce problème
par avance merci
cdt
 

Pièces jointes

  • test2.xls
    68.5 KB · Affichages: 1
Solution
Bonjour gh4, JM,
si je clique sur "Annuler" le prog se bloque sur
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="Microsoft Print to PDF sur Ne03:", PrintToFile:=True, Collate:=True
Alors introduisez On Error Resume Next :
VB:
On Error Resume Next
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="Microsoft Print to PDF sur Ne03:", PrintToFile:=True, Collate:=True
A+

Statistiques des forums

Discussions
315 096
Messages
2 116 184
Membres
112 678
dernier inscrit
arno12345678