Saut de pages

Résolu
Phyll -  
 Phyll -
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.

2 réponses

gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
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

0
Phyll
 
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
0
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonjour,

trouver un tutoriel pour ce faire!

https://www.commentcamarche.net/faq/8130-mise-a-jour-d-une-procedure-ou-d-une-fonction-en-vba
0
Phyll
 
Merci cousin Français, votre aide est appréciée.
Bonne journée
Phyll
0