.PrintOut copies:= ??? - Comment imprimer plusieurs fois le même feuillet ?

[Cumulonymbus]

Bonjour à tous,

Voici la situation: j'ai un classeur excel avec 3 feuillets. Sur le premier feuillet j'ai créé un bouton qui permet d'imprimer le feuillet 2 autant de fois que le nombre renseigné dans la cellule E15 de mon premier feuillet.

Cependant, le nombre dans la cellule a beau être 2, 3, 4... l'imprimante ne m'imprime jamais qu'une seule copie... Quelqu'un sait-il pourquoi et peut-il m'aider ??

Voici mon code:

Sub Bouton2_Clic()

    Dim PrintNo As Integer
    PrintNo = Range("Recherche!E15")

    Sheets("Aperçu des étiquettes").Select
    Range("A1:C4").Select
    Selection.PrintOut Copies:=PrintNo, Preview:=True, Collate:=True
    

End Sub

Merci d'avance à celui qui m'aidera !!

 

[Staple1600]

Re : .PrintOut copies:= ??? - Comment imprimer plusieurs fois le même feuillet ?

Bonjour

Bizarre, Bizarre cette ligne

PrintNo = Range("Recherche!E15")

Essaies plutôt

PrintNo = Sheets("Recherche").Range("E15")

 

[Cumulonymbus]

Re : .PrintOut copies:= ??? - Comment imprimer plusieurs fois le même feuillet ?

Un grand merci, ça marche !