Erreur définie parl'application ou l'objet (erreur 1004) (Résolu)

[Cougar]

Bonjour le forum,

Lorsque j'active ce code :

With ActiveSheet
Range("A1:Q53").Select
Range("Q53").Activate
Selection.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
End With

J'ai l'erreur 1004. Pourtant j'ai utilisé l'enregistreur de macro (fonctionne très bien lors de l'enregistrement) ???

Merci de votre aide

 

[Pierrot93]

Re : Erreur définie parl'application ou l'objet (erreur 1004)

Bonjour,

peut être aucune donnée à imprimer... essaye peut être ceci :

Range("A1:Q53").PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False

bon après midi
@+

 

[Cougar]

Re : Erreur définie parl'application ou l'objet (erreur 1004)

Bonjour,

J'ai aussi essayé cette ligne mais j'ai : «Erreur de compilation: arguement nommé introuvable».

Merci

 

[Pierrot93]

Re : Erreur définie parl'application ou l'objet (erreur 1004)

Bonjour,

supprime le dernier argument :

Range("A1:Q53").PrintOut Copies:=1, Collate:=True

bonne journée
@+

 

[Cougar]

Re : Erreur définie parl'application ou l'objet (erreur 1004)

Bonjour Pierrot,

Effectivement le dernier argument était problématique.

Merci

 

[mutzik]

Re : Erreur définie parl'application ou l'objet (erreur 1004) (Résolu)

Bonjour Cougar, Pierrot, le Forum

sinon, dans une boucle with, il faut utiliser un . devant les range pour faire référence au with

With ActiveSheet
.Range("A1:Q53").PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
End With

devrait le faire

 

[Pierrot93]

Re : Erreur définie parl'application ou l'objet (erreur 1004) (Résolu)

Re,
bonjour Bertrand

bah chez moi l'argument "IgnorePrintAreas" est introuvable sur Excel2010....
bon après midi
@+