Imprimer X fois avec Excel

[mat76]

Bonjour,

J'essai de faire un petit bouton sous Excel qui me valide une impression de X pages, ou X serait la valeur contenu dans une cellule.

J' ai essayer ca mais cela ne marche pas ...

Sheets("identification").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=[b8]

Quelqu'un pourrait il me conseiller?.

D'avance merci.

 

[Sly le globe trotter]

Re : Imprimer X fois avec Excel

Salut Mat76,

une solution serait de faire une boucle "for" avec en indice de fin le nombre de copie que tu désires...

Sylvain

 

[fred65200]

Re : Imprimer X fois avec Excel

bonjour

est ce que tu as bien le nombre d'impression dans ta cellule B8 de la feuille "identification"

 Sheets("identification").Select
    ActiveWindow.SelectedSheets.PrintOut Copies:=['NOM_FEUILLE'!B8]

tu peux aussi essayer

ExecuteExcel4Macro "PRINT(1,,," & ['NOM_FEUILLE'!B8] & ",,,,,,,,2,,,TRUE,,FALSE)"

cordialement

 

[Celeborn61]

Re : Imprimer X fois avec Excel

Salut,

Tu dois avoir un autre problème, parce que ça marche trés bien.

ActiveWindow.SelectedSheets.PrintOut Copies:=[A1]