Imprimer sous excel avec des conditions

campagne72 Messages postés 26 Statut Membre -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour, à tous
dans une feuille (Données1) j'ai en K1 ex: (30), ce chiffre peu changer
je voudrai que la macro me sorte sur imprimante dans la feuille (Edition) les feuilles 1 à (30)
ou 1 à (x) suivant la cellule K1
est-ce possible
merci d'avance


A voir également:

1 réponse

f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 715
 
Bonjour,

Sub Impression()
Sheets("Edition").Select
Nb_Page = Worksheets("Données1").Range("K1").Value
ExecuteExcel4Macro "PRINT(2,1," & Nb_Page & ",1,,,,,,,,2,,,TRUE,,FALSE)"
End Sub


Bonne suite
0