Problème d'impression en macro avec Excel 2010

Résolu/Fermé
MelynB Messages postés 3 Date d'inscription mardi 1 août 2017 Statut Membre Dernière intervention 1 août 2017 - 1 août 2017 à 12:37
MelynB Messages postés 3 Date d'inscription mardi 1 août 2017 Statut Membre Dernière intervention 1 août 2017 - 1 août 2017 à 15:21
Bonjour à tous,

Après des minutes, que dis-je, des heures à tourner le problème dans tous les sens et à chercher sur le forum en vain, je m'échoue ici, avec une petite lueur d'espoir dans les yeux, afin de quémander votre aide...

Je suis débutante en VBA, mais j'arrive à relativement comprendre les "paragraphes" de codage (excusez mon jargon). J'ai donc réussi le bouton d'enregistrement pdf et quelques autres relativement simples. L'impression faisant aussi partie des boutons simples (normalement), je me suis dit que c'était largement à ma portée. SAUF QUE... Et là c'est le drame, lorsque je clique sur "imprimer", une MsgBox s'affiche, me disant, je cite:

"Erreur d'exécution '1004':
Erreur définie par l'application ou par l'objet"

Mes lignes de codes sont les suivantes:

Range("A1:I68").Select
Range("I1").Activate
{Et jusqu'ici tout va bien, mais les problèmes arrivent à ce moment...}
Selection.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
Range("I3").Select

Si vous pouviez m'aider à déboguer ce programme, ce serait super!

Merci beaucoup!
A voir également:

1 réponse

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
1 août 2017 à 13:41
Bonjour,

Essaies simplement (adapter le nom de la feuille) :
Sub Imprimer()
  Worksheets("Feuil1").Range("A1:I68").PrintOut Copies:=1, Collate:=True
End Sub


1
MelynB Messages postés 3 Date d'inscription mardi 1 août 2017 Statut Membre Dernière intervention 1 août 2017
1 août 2017 à 13:53
C'est parfait, merci beaucoup! Ca fonctionne parfaitement :)
Sais-tu pourquoi ma formule ne fonctionnait pas? Juste à titre informatif :)
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779 > MelynB Messages postés 3 Date d'inscription mardi 1 août 2017 Statut Membre Dernière intervention 1 août 2017
1 août 2017 à 14:04
IgnorePrintAreas ne fait pas partie des arguments de la fonction PrintOut du VBA Excel:
https://docs.microsoft.com/fr-fr/office/vba/api/excel.window.printout?redirectedfrom=MSDN
0
MelynB Messages postés 3 Date d'inscription mardi 1 août 2017 Statut Membre Dernière intervention 1 août 2017
1 août 2017 à 15:21
Ah en effet! Merci! :)
0