Comment repeter l'Inserre un saut de page à chaque lignes Excel

Signaler
-
Messages postés
31537
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
1 mars 2021
-
Bonjour,
Je souhaite imprimer chacune des lignes de mon tableau par page . J'avais penser à insérer un saut de page ligne par ligne, mais mon tableau est volumineux. Existe t il un moyen de répéter automatiquement cette mise en page ?
Merci

1 réponse

Messages postés
31537
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
1 mars 2021
344
Bonjour,

1 - Ta question concernant une macro ( du VBA) il faut la poster dans la section VBA du forum.... j'ai déplacé ton sujet dans la bonne section.

2 - Bien que normalement on ne donne pas de code à la demande...
voici un exemple de ce que tu peux faire :

Sub Macro1()
Dim Derniere_Ligne As Integer
Derniere_Ligne = Cells.Find("*", Range("A1"), , , xlByRows, xlPrevious).Row
ActiveWindow.View = xlPageBreakPreview
    For l = 2 To Derniere_Ligne
        Cells(l, 1).Select
        ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
    Next
ActiveWindow.View = xlNormalView
End Sub