TextBox1.Value = Format(Calendar1.Value, "ww")
gibt mir die Kw in die TextBox. Ich vermute aber das die systemeigene Definition von KW ausgegeben wird. Hat jemand ne Ahnung wie ich die Funktion "Deutsche KW" ohne Umwege über Hilfszellen dort einbinden kann?
Grüsse
Wolfgang