Problème d'impression en macro avec Excel 2010 [Résolu]

MelynB 3 Messages postés mardi 1 août 2017Date d'inscription 1 août 2017 Dernière intervention - 1 août 2017 à 12:37 - Dernière réponse : MelynB 3 Messages postés mardi 1 août 2017Date d'inscription 1 août 2017 Dernière intervention
- 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!
Afficher la suite 
3Messages postés mardi 1 août 2017Date d'inscription 1 août 2017 Dernière intervention

4 réponses

Répondre au sujet
Patrice33740 6319 Messages postés dimanche 13 juin 2010Date d'inscription 12 décembre 2017 Dernière intervention - 1 août 2017 à 13:41
+1
Utile
3
Bonjour,

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


Cette réponse vous a-t-elle aidé ?  
MelynB 3 Messages postés mardi 1 août 2017Date d'inscription 1 août 2017 Dernière intervention - 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 :)
Patrice33740 6319 Messages postés dimanche 13 juin 2010Date d'inscription 12 décembre 2017 Dernière intervention > MelynB 3 Messages postés mardi 1 août 2017Date d'inscription 1 août 2017 Dernière intervention - 1 août 2017 à 14:04
IgnorePrintAreas ne fait pas partie des arguments de la fonction PrintOut du VBA Excel:
https://msdn.microsoft.com/fr-fr/library/office/ff823028(v=office.15).aspx
MelynB 3 Messages postés mardi 1 août 2017Date d'inscription 1 août 2017 Dernière intervention - 1 août 2017 à 15:21
Ah en effet! Merci! :)
Commenter la réponse de Patrice33740