une variable "tableau"
Sub LigneSautDePage() Dim i As Long Dim ligne As Long, colonne as long If ActiveSheet.HPageBreaks.Count > 0 Then For i = 1 To ActiveSheet.HPageBreaks.Count ligne = ActiveSheet.HPageBreaks(i).Location.Row - 1 Debug.Print ligne Next i End If If ActiveSheet.VPageBreaks.Count > 0 Then For i = 1 To ActiveSheet.VPageBreaks.Count colonne= ActiveSheet.VPageBreaks(i).Location.Column - 1 Debug.Print colonne Next i End If End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question