Jahr und Kalenderwoche

so...mal schauen ob ich mein problem richtig erklären kann.
ich hab eine Mappe (name: 'Projekt 2003') in der wöchentlich per makro ein blatt eingefügt wird das nach der aktuellen kalenderwoche benannt wird (zb: 'KW22'), das mach ich mit der formel 'DatePart("ww", f, vbMonday, vbFirstFourDays)' (wobei f=date ist). im neuen jahr soll dann automatisch eine neue datei erstellt werden ('Projekt 2004'), aber erst wenn die 1. kalenderwoche beginnt, nicht dass ich nachher ein blatt mit dem namen 'KW52' in 'Projekt 2004' hab obwohl das jehr erst begonnen hat.
hat das jemand kapiert?? wenn nicht versuch ichs nochmal irgendwie anders zu erklären.

gruss Steffi