Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
540to544
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
540to544
540to544
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kalenderwoche

Kalenderwoche
03.01.2005 16:46:08
Heino
Hallo Excelgemeinde
Ich habe folgendes in meinem Makro um die Aktuelle Kalenderwoche zu ermitteln.
DatePart("ww", Now)
Das hat im Jahr 2004 auch gut funktioniert.
Leider liefert mir diese Zeile heute die KW 2 obwohl doch die KW1 ist.
Woran kann das liegen ?

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kalenderwoche
=Peter=
Das liegt an folgendem:
http://de.wikipedia.org/wiki/Kalenderwoche#Kalenderwoche
Beheben kannst du das wie folgt:
http://www.excelformeln.de/formeln.html?welcher=7
Man kann auch eine benutzerdefinierte Funktion verweden (in ein Modul einfügen)

Function DIN_KW(Datum As Date) As Integer
'   von Christoph Kremer, Aachen
Dim t&
t = DateSerial(Year(Datum + (8 - Weekday(Datum)) Mod 7 - 3), 1, 1)
DIN_KW = (Datum - t - 3 + (Weekday(t) + 1) Mod 7) \ 7 + 1
End Function

HTH
Anzeige
AW: Kalenderwoche
Heino
Hallo
Ich Danke Dir.
Mit der benutzerdefinierte Funktion geht es am besten.
Gruß Heino
Danke für die Rückmeldung o.T.
=Peter=
Gruss
Peter

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige