B
B52
Guest
Bonsoir à tous, le forum,
J'ai crée une application qui me permet de saisir des fiches de non conformité.
Une fois saisie, je l'imprime sur l'imprimante par défaut (je travaille avec des imprimantes en réseau) puis enregistre mon fichier et ferme Excel.
Seulement, si il n'y a pas d'imprimante ou alors que celle installée est 'hors service' ma macro bug (ce qui est normal).
je voudrais savoir s'il est possible de résoudre ce problème en ajoutant à ma macro une étape de vérification ou alors le cas échéant, enregistrer mon fichier et le fermer après avoir un message ('Impression annulée').
par avance merci.
Voici ma macro :
Private Sub CommandButton4_Click()
Sheets('FNC français').Select
ActiveWindow.SelectedSheets.PrintOut copies:=1, Collate:=True
Unload UserForm2
Worksheets('Accueil').Select
ThisWorkbook.Close SaveChanges:=True
End Sub
Bien amicalement Stéphane
J'ai crée une application qui me permet de saisir des fiches de non conformité.
Une fois saisie, je l'imprime sur l'imprimante par défaut (je travaille avec des imprimantes en réseau) puis enregistre mon fichier et ferme Excel.
Seulement, si il n'y a pas d'imprimante ou alors que celle installée est 'hors service' ma macro bug (ce qui est normal).
je voudrais savoir s'il est possible de résoudre ce problème en ajoutant à ma macro une étape de vérification ou alors le cas échéant, enregistrer mon fichier et le fermer après avoir un message ('Impression annulée').
par avance merci.
Voici ma macro :
Private Sub CommandButton4_Click()
Sheets('FNC français').Select
ActiveWindow.SelectedSheets.PrintOut copies:=1, Collate:=True
Unload UserForm2
Worksheets('Accueil').Select
ThisWorkbook.Close SaveChanges:=True
End Sub
Bien amicalement Stéphane