Seitenumbruch
24.09.2007 16:17:42
egres
ich habe in der Spalte A den Seitenumbruch mit dem Wort "Umbruch" definiert!
Wie kann ich per VbA nun erreichen das dieser Umbruch auch da gesetzt wird.
da habe ich schon probiert, aber es klappt nicht.
Sub Seitenwechsel()
Dim iRow As Integer
For iRow = WorksheetFunction.CountA(Columns(1)) To 1 Step -1
If Cells(iRow, 1).Value = "Umbruch" Then
Tabelle1.HPageBreaks.Add Cells(iRow, 1)
End If
Next iRow
End Sub
Wer kann mir helfen
Gruss und Danke
Serge