bonjour à tous
dans la mise en page il reporte les lignes 1 et 2 à chaque saut de page
le problème est que en I-J2 il y a toujours écrit page1
j'ai cherché un truc avec macro mais désolé je suis dépassé , je laisse la main
à+
Bonsoir à tous,
une proposition qui doit permettre ce tour de passe-passe (Non testé) :
Code:
Sub IncrémentePage()
dim i as byte, n as byte
n = ActiveWindow.SelectedSheets.HPageBreaks.Count
For i = 1 To n + 1
ActiveSheet.Range("I2") = i
ActiveSheet.PrintOut From:=i, To:=i, Copies:=1
Next
End Sub