Formel für Kalender mit nur Sonn- und Feiertagen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo
so?

Tabelle1

	A	B	C	D
1	2016	Fr. 01.01.2016	1	Neujahr
2		Sa. 02.01.2016	1
3		So. 03.01.2016	1
4		Mo. 04.01.2016	2
5		Di. 05.01.2016	2
6		Mi. 06.01.2016	2	Heilige Drei Könige
7		Do. 07.01.2016	2
8		Fr. 08.01.2016	2
9		Sa. 09.01.2016	2
10		So. 10.01.2016	2
11		Mo. 11.01.2016	3
12		Di. 12.01.2016	3
13		Mi. 13.01.2016	3
14		Do. 14.01.2016	3
15		Fr. 15.01.2016	3
16		Sa. 16.01.2016	3

verwendete Formeln
Zelle	Formel	Bereich	N/A
B1	=DATUM(A1;1;1)
C1	=KALENDERWOCHE(B1;2)
D1	=FeierTag(B1;0)
B2	=B1+1

Bedingte Formatierung Haupttabelle 1
Wird angewendet auf	Nr. Bed. Regeltyp	Operator	Formel1	Formel2	Format Schrift Füllfarbe	Unterstrichen	Schrift- farbe	Muster	Musterfarbe	Typ	Bereich
$B:$B	01.Bed.: Formel ist		=UND(B1<>"";WOCHENTAG(B1;2)=6)		49407					2	B:B
$B:$B	02.Bed.: Formel ist		=UND(B1<>"";ODER(WOCHENTAG(B1;2)=7;D1<>""))		255					2	B:B

Bedingte Formatierung Haupttabelle 2					oberere/unterer Bereich
Wird angewendet auf	Nr. Bed.	Format Zelle	Anhalten	Auswahl	Anzeige	Anzahl	Durchschnitt	Typ	Bereich
$B:$B	01.Bed.		Falsch					2	B:B
$B:$B	02.Bed.		Falsch					2	B:B

Die Bedingungen wurden mit Excel-Version ab 2007 ausgelesen.

http://excel-inn.de/dateien/vba_beispiele/tabellenanzeige_in_html_addin.zip

http://Hajo-Excel.de/tools.htm

XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007

Add-In-Version 19.03 einschl. 64 Bit

Darin ist eine eine Function für die Feiertage
Option Explicit Public Function FeierTag(Datum As Date, n As Boolean) As String Dim Jahr As Integer Jahr = Year(Datum) If (Jahr > 1904) And (Jahr 10) Then OsterSonntag = OsterSonntag - 7 End If End If End If End Function
https://www.herber.de/bbs/user/102664.xlsm
Gruß UweD

Hallo Christian,
das geht auch per Formel.
Sonntagsdienste

	A	B	C	D	E	F
1	2016
2		SONNTAGSDIENSTE
3		Woche	Datum	Satz	Korrektorium
4		53	Freitag 01.01.2016	Strauß	Widner
5		53	Sonntag 03.01.2016
6		1	Mittwoch 06.01.2016
7		1	Sonntag 10.01.2016
8		2	Sonntag 17.01.2016
9		3	Sonntag 24.01.2016
10		4	Sonntag 31.01.2016
11		5	Sonntag 07.02.2016
12		6	Sonntag 14.02.2016
13		7	Sonntag 21.02.2016
14		8	Sonntag 28.02.2016
15		9	Sonntag 06.03.2016
16		10	Sonntag 13.03.2016
17		11	Sonntag 20.03.2016
18		12	Sonntag 27.03.2016
19		13	Montag 28.03.2016
20		13	Sonntag 03.04.2016
21		14	Sonntag 10.04.2016
22		15	Sonntag 17.04.2016

Formeln der Tabelle

Zelle	Formel
B4	=WENN(C4="";"";KALENDERWOCHE(C4;21))
C4	{=WENNFEHLER(KKLEINSTE(WENN(((REST(ZEILE(INDEX(A:A;DATUM($A$1;1;1)):INDEX(A:A;DATUM($A$1;12;31))); 7)=1)+(ISTZAHL(VERGLEICH(ZEILE(INDEX(A:A;DATUM($A$1;1;1)):INDEX(A:A;DATUM($A$1;12;31))); Feiertag;0)))); ZEILE(INDEX(A:A;DATUM($A$1;1;1)):INDEX(A:A;DATUM($A$1;12;31)))); ZEILE(A1)); "")}

Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!

Matrix verstehen

Namen in Formeln

Zelle	Name	Bezieht sich auf
C4	Feiertag	='Sonn- und Feiertage'!$C$3:$C$17

Namen verstehen

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Gruß Sepp

Beliebteste Forumthreads (12 Monate)

	A	B
5	53. KW	Fr.01.01.2016
6	53. KW	Sa.02.01.2016
7	53. KW	So.03.01.2016
8	1. KW	Mo.04.01.2016
9	1. KW	Di.05.01.2016

Formel für Kalender mit nur Sonn- und Feiertagen

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

169 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Formel für Kalender mit nur Sonn- und Feiertagen

12 Beiträge zum Forumthread Beiträge zu diesem Forumthread

169 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread