Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1268to1272
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1268to1272
1268to1272
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Flexibler Kalender

Flexibler Kalender
Paul
Hallo,
ich suche eine Möglichkeit einen Monatskalender mit Arbeitstagen zu erstellen.
Wobei der Kalender durch die Eingabe des Jahres und des Monats bestimmt wird.
Jetzt sind aber ja die Monate unterschiedlich lang (19-22 Tage) und ich hätte gerne, dass die Aufzählung immer mit dem letzten Arbeitstag endet, d.h. wenn der Monat mehr wie 19 A-Tage hat stehen unten immer die ersten Tage des neuen Monats, hab eine Musterdatei eingestellt, kann mir da jemand helfen
Gruß
Paul
https://www.herber.de/bbs/user/80890.xlsx

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
Flexibler Kalender - Monatsenden
07.07.2012 18:48:21
Erich
Hi,
probier mal
 CD
101.04. So4
202.04. Mo 
303.04. Di 
404.04. Mi 
505.04. Do 
610.04. Di 
711.04. Mi 
812.04. Do 
913.04. Fr 
1016.04. Mo 
1117.04. Di 
1218.04. Mi 
1319.04. Do 
1420.04. Fr 
1523.04. Mo 
1624.04. Di 
1725.04. Mi 
1826.04. Do 
1927.04. Fr 
2030.04. Mo 
21  
22  
23  
24  

Formeln der Tabelle
ZelleFormel
C1=DATUM(K12;D1;1)
C2{=WENN(C1="";"";WENN(MONAT( C1+MIN(WENN((WOCHENTAG(C1+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(C1+ZEILE($1:$25); L$14:L$26;0)); ZEILE($1:$25))))=D$1; C1+MIN(WENN((WOCHENTAG(C1+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(C1+ZEILE($1:$25); L$14:L$26;0)); ZEILE($1:$25))); ""))}
C24{=WENN(C23="";"";WENN(MONAT( C23+MIN(WENN((WOCHENTAG(C23+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(C23+ZEILE($1:$25); L$14:L$26;0)); ZEILE($1:$25))))=D$1; C23+MIN(WENN((WOCHENTAG(C23+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(C23+ZEILE($1:$25); L$14:L$26;0)); ZEILE($1:$25))); ""))}
Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!
Matrix verstehen

Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich
Anzeige
AW: Flexibler Kalender - Monatsenden
08.07.2012 12:25:57
Paul
Hallo Erich,
dass sieht soweit gut aus, wenn es jetzt noch möglich wäre die Feiertage die in Spalte "L" stehen, wegzulassen dann ist dass Teil perfekt!
Gruß Paul
noch mal nachsehen?
08.07.2012 13:32:18
Erich
Hi Paul,
was genau meinst du mit "die Feiertage, die in Spalte "L" stehen, weglassen"?
Verstehe ich das richtig, dass die Feiertage in Spalte C übersprungen werden sollen?
Dann such doch mal in der Tabelle in meinem vorigen Post in Spalte C den Fr, 06.04. und den Mo, 09.04....
Hast du das mit den Feiertagen wirklich ausprobiert?
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich
Startdatum korrigiert
08.07.2012 13:46:04
Erich
Hi,
auch bei C1 sollte der Ausschluss der Wochenenden und Feiertasge funktionieren,
deshalb ist auch in C1 eine etwas längere Formel nötig:
 CD
1Di  03.04.4
2Mi  04.04. 
3Do  05.04. 
4Fr  06.04. 
5Di  10.04. 

Formeln der Tabelle
ZelleFormel
C1{=DATUM(K12;D1;1)+MIN(WENN((WOCHENTAG(DATUM(K12;D1;1)+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(DATUM(K12;D1;1)+ZEILE($1:$25); L$14:L$27;0)); ZEILE($1:$25)))}
C2{=WENN(C1="";"";WENN(MONAT( C1+MIN(WENN((WOCHENTAG(C1+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(C1+ZEILE($1:$25); L$14:L$27;0)); ZEILE($1:$25))))=D$1; C1+MIN(WENN((WOCHENTAG(C1+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(C1+ZEILE($1:$25); L$14:L$27;0)); ZEILE($1:$25))); ""))}
Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!
Matrix verstehen


 KL
122012 
13  
14Neujahr01.01. So
15          frei erfunden02.04. Mo
16Karfreitag07.04. Sa
17Ostersonntag08.04. So
18Ostermontag09.04. Mo

Formeln der Tabelle
ZelleFormel
L14=DATUM(K12;1;1)
L15=DATUM(K12;4;2)
L16=L18-2
L17=DM((TAG(MINUTE($K$12/38)/2+55)&".4."&$K$12)/7;)*7-6
L18=L17+1

Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich
Anzeige
Startdatum korrigiert korrigiert
08.07.2012 13:50:19
Erich
Hi,
da war doch der Karfreitag auf den Samstag gerutscht...
 CD
1Di  03.04.4
2Mi  04.04. 
3Do  05.04. 
4Di  10.04. 
5Mi  11.04. 

Formeln der Tabelle
ZelleFormel
C1{=DATUM(K12;D1;1)+MIN(WENN((WOCHENTAG(DATUM(K12;D1;1)+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(DATUM(K12;D1;1)+ZEILE($1:$25); L$14:L$27;0)); ZEILE($1:$25)))}
C2{=WENN(C1="";"";WENN(MONAT( C1+MIN(WENN((WOCHENTAG(C1+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(C1+ZEILE($1:$25); L$14:L$27;0)); ZEILE($1:$25))))=D$1; C1+MIN(WENN((WOCHENTAG(C1+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(C1+ZEILE($1:$25); L$14:L$27;0)); ZEILE($1:$25))); ""))}
Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!
Matrix verstehen


 KL
122012 
13  
14Neujahr01.01. So
15          frei erfunden02.04. Mo
16Karfreitag06.04. Fr
17Ostersonntag08.04. So
18Ostermontag09.04. Mo

Formeln der Tabelle
ZelleFormel
L14=DATUM(K12;1;1)
L15=DATUM(K12;4;2)
L16=L17-2
L17=DM((TAG(MINUTE($K$12/38)/2+55)&".4."&$K$12)/7;)*7-6
L18=L17+1

Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich
Anzeige
AW: Startdatum korrigiert korrigiert
08.07.2012 16:09:58
Paul
Hallo Erich,
hab die Formel angepasst leider beginnt der Kalender nicht immer mit dem ersten Arbeitstag.
Hab die geänderte Datei nochmal reingestellt
https://www.herber.de/bbs/user/80896.xlsx
Gruß Paul
Startdatum korrigiert * 3
08.07.2012 18:59:20
Erich
Hi,
ja, das war wieder nichts. :-(
Aber so sollte es jetzt funzen (B1 und C1 sollten immer dasselbe Ergebnis haben):
 BCD
101.06.201201.06. Fr6

Formeln der Tabelle
ZelleFormel
B1{=(D1&-K12)-1+MIN(WENN((REST((D1&-K12)-3+ZEILE(1:25); 7)+1<6) *ISTNV(VERGLEICH((D1&-K12)-1+ZEILE(1:25); L14:L27;0)); ZEILE(1:25)))}
C1{=DATUM(K12;D1;0)+MIN(WENN((WOCHENTAG(DATUM(K12;D1;0)+ZEILE($1:$25)-1)<6) *ISTNV(VERGLEICH(DATUM(K12;D1;0)+ZEILE($1:$25); L$14:L$27;0)); ZEILE($1:$25)))}
Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!
Matrix verstehen

Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich
Anzeige
AW: Startdatum korrigiert * 3
08.07.2012 19:42:56
Paul
Hallo Erich,
jetzt schein die Sache perfekt vielen Dank, eine automatisierter Monatsarbeitstagekalender, genau das was ich brauche,
Danke, Gruß Paul

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige