Kalendersteuerelement und Kalenderwoche

Ist es möglich, das Kalendersteuerelement und die VBA-Routine
zum Berechnen der Kalenderwoche zu kombinieren ?

siehe Beispieldatei, beim Klicken auf einen Tag wird in einem Label
die Kalenderwoche zum Datum angezeigt:
 
Download - 8 KB