Office: Kalenderwochen Beginn und Ende

Hallo,

ich suche nach einem Code der mir von einem bestimmten Startdatum aus die Kalenderwochen der nächsten 12 Monate (Startdatum immer Monatsanfang, Ende nach 12 Monaten immer Monatsende) mit Start und Ende ausweist.

Angenommen in A2 steht das Startdatum 01.01.2010.

1. Spalte = KW
2. Spalte = Beginn der KW
3. Spalte = Ende der KW

Hat jemand eine Idee?

:)

 

Hallo ?,

A5:C5 dann runterkopieren.

Tabelle3

	A	B	C	D
1	01.01.2010
2
3	KW	Beginn	Ende
4	53	01.01.2010	03.01.2010
5	1	04.01.2010	10.01.2010
6	2	11.01.2010	17.01.2010
7	3	18.01.2010	24.01.2010
8	4	25.01.2010	31.01.2010
9	5	01.02.2010	07.02.2010
10	6	08.02.2010	14.02.2010
11	7	15.02.2010	21.02.2010
12	8	22.02.2010	28.02.2010
13	9	01.03.2010	07.03.2010
14	10	08.03.2010	14.03.2010
15	11	15.03.2010	21.03.2010
16	12	22.03.2010	28.03.2010
17	13	29.03.2010	04.04.2010
18	14	05.04.2010	11.04.2010
19	15	12.04.2010	18.04.2010
20	16	19.04.2010	25.04.2010
21	17	26.04.2010	02.05.2010
22	18	03.05.2010	09.05.2010
23	19	10.05.2010	16.05.2010
24	20	17.05.2010	23.05.2010

Zelle	Formel
A4	=KÜRZEN((B4-DATUM(JAHR(B4+3-REST(B4-2;7));1;REST(B4-2;7)-9))/7)
B4	=A1
C4	=B4+7-WOCHENTAG(B4;2)
A5	=KÜRZEN((B5-DATUM(JAHR(B5+3-REST(B5-2;7));1;REST(B5-2;7)-9))/7)
B5	=C4+1
C5	=C4+7

Excel Tabellen im Web darstellen >>

 

Hallo Josef,

vielen Dank dafür, funktioniert grundsätzlich auch so.

Mein Probelm ist, dass ich diese Werte in VBA weiter verwenden will und die Kalenderwochen in diesem Beispiel 01.01.2010 bis 31.12.2010 (12 Monate) bei erreichen des Datums 31.12.2010 "abgeschnitten" werden müssen.

Wenn ich die Formel verwende bin ich hier:
KW Beginn Ende
51 20.12.2010 26.12.2010
52 27.12.2010 02.01.2011
Ich benötige aber (leider)
KW Beginn Ende
51 20.12.2010 26.12.2010
52 27.12.2010 31.12.2010


Ist das mit Formeln möglich? Wenn man bedenkt, dass der 12-Monatsintervall auch in einem Monat innerhalb des Jahres erreicht werden kann...

 

Hallo ?

schau mal ob das so passt.




Gruß Sepp

 

Ja Super, so passt es!!!

Danke Josef *Smilie