Excel insertion saut de page avec condition

pcbb -  
 giheller -
Bonjour,

J'aimerais sous excel mettre un saut de page à chaque fois qu'une cellule de ma colonne A contient le mot "Chpt".
Je n'arrive as à trouver le code me permettant de faire cela.
Je galère, galère, galère...
Merci pour votre aide.
Configuration: Windows XP
Internet Explorer 7.0

1 réponse

  1. giheller
     
    bonjour,

    i = 1
    While Range("A" + CStr(i)).Value <> ""
    Range("A" + CStr(i)).Select
    If Range("A" + CStr(i)).Value = "Chpt" Then
    ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
    End If

    i = i + 1
    Wend
    1