Discussion :

[xadep]

Bonjour à tous,

j'ai édité via une programmation en vba un listing de données reprenant des sous totaux par jour, je souhaiterais pouvoir faire un saut de page (autrement dit que le jour suivant s'imprime sur une autre feuille). Est-ce possible et dans ce cas comment procéder.

Merci de votre réponse

[mercatog]

Une première proposition à l'aide de l'enregistreur de macros

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim LignBreak As Long  'ou integer si tu n'as pas bcp de données
With Sheets("Feuil1")
On Error Resume Next
.HPageBreaks(1).Delete
.HPageBreaks.Add Before:=Sheets("Feuil1").Range("A" & LignBreak)
End With

il suffit de trouver LignBreak

[xadep]

ok merci de votre aide mais je viens de trouver