Bonjour à toutes et tous

je suis nul en vba et je rencontre un problème
Voila

J'ai une petite macro simple que je voudrai faire tourner automatiquement et autant de fois ( de 1 à x) le x étant une valeur dans une cellule
Cette macro , en premier incrément de 1 la valeur d'une cellule, ce qui permet par le biais de recherche V d'importer des données
en deuxième elle commande l'impression d'une zone d'impression
Dans le fichier de base les lignes sont numérotées et dans une cellule j'ai le nombre total de lignes (Formule max de la collone A).
Je voudrais que ma macro tourne autant de fois pour arriver à la quantités de ligne (donnée trouvée dans la cellule N17)
Ma macro est :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub impression() 'Sub Incremente()
 
' increment de une unité (N°) de ligne
 
Range("I18").Value = Range("I18").Value + 1
 
' impression Macro
' Macro enregistrée le 27/02/2011 par BUSQUETS-MAYOL-CHRISTIAN
'
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
Si quelqu'un pouvait m'aider, cela serait genial

Merci d'avance

Christian