PDA

Vollständige Version anzeigen : Kalenderwoche


Krause
19.09.2001, 19:37
Hallo Cracks,
folgendes Problem :
Ich möchte in Excel in einer Zelle eine Kalenderwoche eintragen und dann soll Automatisch in einer anderen Zelle das Datum des Montags dieser Woche des aktuellen Jahres erscheinen !!!

Hoffe um Hilfe
Christian

<p align="left"><font size="1" face="Century Gothic"><font color="#000000">Moderatorenanmerkung: die Überarbeitung dieses Beitrages ist im Zuge der Arbeiten zu sehen, die durch den Wechsel der Forensoftware zum 01.01.2003 verursacht wurden.

Es wurde in diesem Beitrag ein Link entfernt.</font>

jinx
19.09.2001, 20:17
Moin, Christian,

eigentlich kenne ich nur den umgekehrten Weg, aber die Lösung könnte so aussehen:

<div><link href="http://www.ms-office-forum.net/forum/externals/codeconv.css" rel="stylesheet"><pre>36892
16.09.2001 37 258 10.09.01
17.09.2001 38 265 17.09.01</pre></div>


Dazu könnte folgender Code in ein Modul gehören:
<div><link href="http://www.ms-office-forum.net/forum/externals/codeconv.css" rel="stylesheet"><pre><span class="TOKEN">Function</span> DIN_KW(datum)
DIN_KW = DatePart(&quot;ww&quot;, datum, vbMonday, vbFirstFourDays)
<span class="TOKEN">End</span> <span class="TOKEN">Function</span></pre></div>
Code eingefügt mit dem MOF Code Converter (http://www.ms-office-forum.net/forum/codeconverter.php)

Folgende Angabe sind zu machen:
C1: 'hier erfolgt die Eingabe des ersten Tages des Jahres
A2: 'hier erfolgt die Eingabe des Datums - je nach Aufgabenstellung
B2: =DIN_KW(A2) 'berechnen der KW bzw. Eingabe der KW - je nach Aufgabenstellung
C2: =B2*7-1 (gilt aber nur für 2001, da dort Woche mit Montag beginnt!) 'berechnen des letzten Tages der KW im laufenden Jahr als Zahl
D2: =C2+$A$1-6 'Addition zur Ermittlung des Datums des Montages der betreffenden KW

Eigentlich doch ganz einfach... ;)

Für andere Jahre müsste der Wochentag des 01.01. festgelegt werden und die Formeln entsprechend angepasst werden....

Für weitere Angaben solltest Du per Suchmaschine nach den DIN-Vorgaben für die Kalenderwoche suchen...

<font size="1" face="Century Gothic">Moderatorenanmerkung: die Überarbeitung dieses Beitrages ist im Zuge der Arbeiten zu sehen, die durch den Wechsel der Forensoftware zum 01.01.2003 verursacht wurden.

Es wurden in diesem Beitrag Links korrigiert, die auf falsche Adressen zeigten und die Signatur angepasst...</font>