Bonjour,

J'aimerai insérer des sauts de pages automatiquement en fonction des valeurs des cellules.
J'ai plusieurs listes de données les unes à la suites des autres et je tiens à ce que chaque liste ne soit pas sur 2 pages mais je doit pouvoir avoir plusieurs listes sur une même page pour en limiter le nombre.
Entre 2 listes, j'ai en colonne A, la veuleur "vide" de saisie.

Voici le code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
DEBUT = -55
FIN = 0
SAUT = 56
For J = SAUT To 3000 Step 56
    DEBUT = DEBUT + 56
    FIN = FIN + 56
        For I = FIN To DEBUT Step -1
        If Cells(I, 1) = "vide" Then
        Rows(I).Select
        ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
        TEST = I
        GoTo suite
        Else
        End If
        Next
suite:
Next

Le pb c'est que ma 1ère boucle "j" à lieu toutes les 56 lignes
Alors que si mon premier saut de page intervient au bout de 40 lignes, j'aimerai qu'il enchaine sur la 106ème ligne et non la 112ème