Saut de page via InputBox

Bonsoir à tous,

Je reviens vers vous car je suis à la recherche d'une petite macro!

Existe t-il un moyen d'insérer un saut de page dans un fichier excel selon le numéro d'une ligne?

Dans l'idéal une msgbox qui s'ouvre :

1ere possibilité: demande le numéro de ligne ou l'on souhaite insérer le saut de page!!^^

2eme possibilité: un nombre qui va engendrer un saut de page tous les =ce nombre (ex: on insère 30 et alors les sauts de pages se feront toutes les 30 lignes...)

Si c'est possible ou que quelqu'un à ce genre de macro en stock, je suis preneur^^

UN GRAND MERCI A TOUS DE VOTRE AIDE PAR AVANCE....

Salut le Forum

Un début de solution

Sub SautPage()
Dim i As Integer
    ActiveSheet.ResetAllPageBreaks
    For i = 30 To 110 Step 30
        ActiveSheet.HPageBreaks.Add Before:=Range("A" & i)
    Next i
End Sub

Mytå

Bonjour Myta!

Tout d'abord Merci pour ta réponse!

Alors ta macro fonctionne en revanche elle insert pas un saut de page en ligne 30 mais en ligne 29? Normal?

En revanche il y a un petit problème^^, ta macro débute par réinitialiser les sauts de page ("ResetAllPageBreaks") puis en insert des nouveaux en fonction de la variable i mais le truc c'est que les sauts de page par défaut restent eux aussi.... du coup on gère qu'à moitié!!

Est-il possible de supprimer les sauts de page par défaut?

Peut-on modifier l'intervalle des sauts de page d'une manière plus pratique ou faut-il passer obligatoirement par le code?

Merci pour le temps consacré!