Numero page voulu dans une cellule

[gagnonpeter]

J'ai un fichier donc j'aimerais ecrire dans une cellule un critère d'impression. Exemple, par defaut je veux ecrire 1, ce qui indiquera que quand je vais imprimer, la page 1 de 1 s'imprimera. Quand j'écrirai 2, alors la page 1 ET 2 s'imprimera. Si j'écrie 3, la page 1,2 ET 3 s'imprimera. Comment faire?

 

[job75]

Re : Numero page voulu dans une cellule

Bonsoir gagnonpeter,

If Val([A1]) < 1 Then [A1] = 1
ActiveSheet.PrintOut From:=1, To:=Val([A1])

A+

 

[gagnonpeter]

Re : Numero page voulu dans une cellule

Merci! ))