Saut de pages Résolu

Question

Bonjour, comment faire pour insérer automatiquement un saut de page , à "toutes les 37 lignes" sans être obligé de le faire manuellement dans "aperçu des sauts de pages" ? Merci et bonne journée
Phyll, du Québec.

gbinforme · Answer

Bonjour au Québécois,

Pour le faire globalement, tu peux utiliser cette petite macro qui met un saut pour 37 lignes.
Public Sub saut_page()
Const taille = 37 ' nombre lignes par page
Dim lgs As Long
With ActiveSheet
    For lgs = 1 + taille To .UsedRange.Rows.Count Step taille
        .HPageBreaks.Add .Cells(lgs, 1)
    Next lgs
End With
End Sub

Phyll · Answer

Bonjour M. gbinforme, merci pour l'info que je garde précieusement jusqu'à ce que mon ami technicien me rappel (il est bien occupé) ou que je trouve par moi-même la façon d'écrire "une macro" car je n'ai jamais fais cela mais je vais bien me trouver un tutoriel pour ce faire!
Merci encore et bonne soirée.
Phyll

Saut de pages

2 réponses

Discussions similaires

Newsletters