Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Wenn samstag dann Seitenwechsel

Wenn samstag dann Seitenwechsel
27.07.2005 14:26:37
Ralf
Hallo alle zusammen
ich habe da ein Problem und zwar hab e ich einen Stundenzettel erstellt wo die Wochentage eingetragen werden
=WENN(B92="";"";WOCHENTAG(B92;1))
jetzt möchte ich das wenn der Tag ein Sammstag ist ein Seitenwechsel in der nächten zelle eingefügt wird.
Ich weiß nicht ob das mit einer wenn dann Formel geht oder mit einem Makro

Die Datei https://www.herber.de/bbs/user/25054.xls wurde aus Datenschutzgründen gelöscht

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn samstag dann Seitenwechsel
27.07.2005 16:31:41
Ralf
Hallo,
Den Bereich (die Spalte, in der der Wochentag steht) mußt Du noch individuell festlegen. Ansonsten sollte das funktionieren:

Sub Zeilenumbruch()
Dim Zeile%, Bereich$, x
Bereich = "B1:B20"
For Each x In Range(Bereich).Cells
If x = 7 Then
Zeile = x.Row
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=Range(Zeile & ":" & Zeile)
End If
Next
End Sub

Ciao, Ralf
Anzeige
AW: Wenn samstag dann Seitenwechsel
28.07.2005 07:30:27
ede
hallo ralf,
habe mir mal deine tabelle angesehen und überarbeitet.
habe alles ohne makro gemacht. die vorhandenen stillgelegt!
schau dir mal meine version an!
https://www.herber.de/bbs/user/25068.xls
die weiteren monate musst du selber machen, evt. unten noch zeilen anfügen!
rückmeldung wäre nett
viel erfolg
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige