recuperer le numéro de ligne qui subit le saut de page

Le
Fredo(67)
bonjour,

tout est dans le titre,
et ce bout e code, récupéré sur Excelabo ne semble pas fonctionner
MsgBox (Worksheets(1).HPageBreaks(1).Location)

merci de m'éclairer sur l'erreur.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
DanielCo
Le #26315682
Bonjour,
MsgBox Worksheets(1).HPageBreaks(1).Location.Row
à condition, bien sûr, qu'il y ait un saut de page...
Cordialement.
Daniel


bonjour,

tout est dans le titre,
et ce bout e code, récupéré sur Excelabo ne semble pas fonctionner...
MsgBox (Worksheets(1).HPageBreaks(1).Location)

merci de m'éclairer sur l'erreur.
Fredo(67)
Le #26315686
Merci,

effectivement, maintenant, ça marche...



Le vendredi 17 octobre 2014 10:27:58 UTC+2, DanielCo a écrit :
Bonjour,

MsgBox Worksheets(1).HPageBreaks(1).Location.Row

à condition, bien sûr, qu'il y ait un saut de page...

Cordialement.

Daniel





> bonjour,

>

> tout est dans le titre,

> et ce bout e code, récupéré sur Excelabo ne semble pas fonctionne r...

> MsgBox (Worksheets(1).HPageBreaks(1).Location)

>

> merci de m'éclairer sur l'erreur.
MichD
Le #26315729
Bonjour,


Sub test()
Dim nb As Long
With Worksheets("Feuil1")
nb = .HPageBreaks.Count
If nb > 1 Then
.DisplayPageBreaks = True
MsgBox .HPageBreaks(1).Location
.DisplayPageBreaks = False
End If
End With
End Sub
Publicité
Poster une réponse
Anonyme