Clever-Excel-Forum

Normale Version: Datum aus KW berechnen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo zusammen,

ich muß aus JJKW das Datum berechnen.
Dazu habe ich folgendes gefunden, die Formel in E ist von hier:
http://www.pctipp.ch/tipps-tricks/kummer...eln-29232/

die Formel in F von Jörg Schieb:
http://www.schieb.de/711198/microsoft-ex...-ermitteln
Diese ist mir lieber, da deutlich kürzer.
Aber sie bringt nicht, wie es auf der Seite steht, den ersten Tag der Woche, sondern immer einen anderen. Und das stimmt halt manchmal nicht.
Warum bringt Excel mit der Schieb-Formel das falsche Datum? Waum sagt dem das keiner?

Tabelle1
DEFGHIJKL
1Jahr/KWFormel PCtipp.chWochentagFormel SchiebWochentagKWJahr1
2131829.04.2013Mo29.04.2013Mo182013
3131906.05.2013Mo05.05.2013So192013
4132624.06.2013Mo28.06.2013Fr262013
5132808.07.2013Mo10.07.2013Mi282013
6133129.07.2013Mo27.07.2013Sa312013
7133312.08.2013Mo14.08.2013Mi332013
8133022.07.2013Mo21.07.2013So302013
9133709.09.2013Mo13.09.2013Fr372013
10134321.10.2013Mo25.10.2013Fr432013
11141431.03.2014Mo30.03.2014So142014
12140603.02.2014Mo05.02.2014Mi062014
13141431.03.2014Mo30.03.2014So142014
14140710.02.2014Mo11.02.2014Di072014
15140420.01.2014Mo25.01.2014Sa042014
16143311.08.2014Mo14.08.2014Do332014
17133602.09.2013Mo01.09.2013So362013
18143204.08.2014Mo09.08.2014Sa322014
19150526.01.2015Mo30.01.2015Fr052015

verwendete Formeln
Zelle Formel Bereich N/A
E2:E19=DATUM(K2;1;1)+(J2-WENN(WOCHENTAG(DATUM(K2;1;1);2)>4;0;1))*7+$L$1-1+1-WOCHENTAG(DATUM(K2;1;1)+(J2-WENN(WOCHENTAG(DATUM(K2;1;1);2)>4;0;1))*7;2)
G2:G19=DATUM(K2;1;7*J2-3-WOCHENTAG(DATUM(J2;;);3))
F2:F19,H2:H19=E2
J2:J19=RECHTS(D2;2)
K2:K19="20"&LINKS(D2;2)
Excel-Inn.de
Hajo-Excel.de
XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007
Add-In-Version 19.08 einschl. 64 Bit

(20.11.2015, 13:43)Rabe schrieb: [ -> ]Hallo zusammen,

ich muß aus JJKW das Datum berechnen...

Hi Ralf, wenn du jeweils dem Montag willst schau doch bei excel-formel.de nach. Dort findest du u.a. ..:

Arbeitsblatt mit dem Namen 'Blatt11'
 JKLM
218201329.04.2013Montag
319201306.05.2013Montag
426201324.06.2013Montag
528201308.07.2013Montag
631201329.07.2013Montag
733201312.08.2013Montag
830201322.07.2013Montag
937201309.09.2013Montag
1043201321.10.2013Montag
1114201431.03.2014Montag
126201403.02.2014Montag
1314201431.03.2014Montag
147201410.02.2014Montag
154201420.01.2014Montag
1633201411.08.2014Montag
1736201302.09.2013Montag
1832201404.08.2014Montag
195201526.01.2015Montag

ZelleFormel
J2=--(RECHTS(D2;2))
K2=--("20" &LINKS(D2;2))
L2=7*RUNDEN((7&1-K2)/7+J2;)+177
M2=L2
Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg
Hallo,

das Problem liegt wieder mal beim Anwender:


Code:
=DATUM(K2;1;7*J2-3-WOCHENTAG(DATUM(J2;;);3))



Code:
=DATUM(K2;1;7*J2-3-WOCHENTAG(DATUM(K2;;);3))


Arbeitsblatt mit dem Namen 'Tabelle1'
 DEFGHIJKL
1Jahr/KWFormel PCtipp.chFormel SchiebExcelformelnWochentagKWJahr
2131829.04.201329.04.201329.04.201329.04.201329.04.2013Mo182013
3131906.05.201306.05.201306.05.201306.05.201306.05.2013Mo192013
4132624.06.201324.06.201324.06.201324.06.201324.06.2013Mo262013
5132808.07.201308.07.201308.07.201308.07.201308.07.2013Mo282013
6133129.07.201329.07.201329.07.201329.07.201329.07.2013Mo312013
7133312.08.201312.08.201312.08.201312.08.201312.08.2013Mo332013
8133022.07.201322.07.201322.07.201322.07.201322.07.2013Mo302013
9133709.09.201309.09.201309.09.201309.09.201309.09.2013Mo372013
10134321.10.201321.10.201321.10.201321.10.201321.10.2013Mo432013
11141431.03.201431.03.201431.03.201431.03.201431.03.2014Mo142014
12140603.02.201403.02.201403.02.201403.02.201403.02.2014Mo062014
13141431.03.201431.03.201431.03.201431.03.201431.03.2014Mo142014
14140710.02.201410.02.201410.02.201410.02.201410.02.2014Mo072014
15140420.01.201420.01.201420.01.201420.01.201420.01.2014Mo042014
16143311.08.201411.08.201411.08.201411.08.201411.08.2014Mo332014
17133602.09.201302.09.201302.09.201302.09.201302.09.2013Mo362013
18143204.08.201404.08.201404.08.201404.08.201404.08.2014Mo322014
19150526.01.201526.01.201526.01.201526.01.201526.01.2015Mo052015

ZelleFormel
E2=DATUM(L2;1;1)+(K2-WENN(WOCHENTAG(DATUM(L2;1;1);2)>4;0;1))*7+$M$1-1+1-WOCHENTAG(DATUM(L2;1;1)+(K2-WENN(WOCHENTAG(DATUM(L2;1;1);2)>4;0;1))*7;2)
F2=DATUM(L2;1;7*K2-3-WOCHENTAG(DATUM(L2;;);3))
G2=("4.1."&LINKS(D2;2))+RECHTS(D2;2)*7-7-REST("2.1."&LINKS(D2;2);7)
H2=DATUM(L2;1;7*K2-3-WOCHENTAG(DATUM(L2;;);3))
I2=DATUM(20&LINKS(D2;2);1;7*RECHTS(D2;2)-3-WOCHENTAG(DATUM(20&LINKS(D2;2);;);3))
J2=E2
K2=RECHTS(D2;2)
L2=20&LINKS(D2;2)
Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg


Die Formel von Schieb ist die von Peter Dorigo aus: http://excelformeln.de/formeln.html?welcher=186
In A1 das Jahr z.B. 2013
in B1 die Kalenderwoche z.b 18

in C1: Montag in kw 18

Code:
=DATE(A1;1;4)-WEEKDAY(DATE(A1;1;4);2)+1+7*(B1-1)

in C2: Dienstag in kw 18

Code:
=DATE(A1;1;4)-WEEKDAY(DATE(A1;1;4);2)+2+7*(B1-1)

in C3: Mittwoch in kw 18

Code:
=DATE(A1;1;4)-WEEKDAY(DATE(A1;1;4);2)+3+7*(B1-1)

schau mal für die Erklärung: http://www.snb-vba.eu/VBA_ISO_weeknummer_en.html ; 'VBA: calculate a certain day in a certain ISO-week'