VBA Excel gerer les dates

Bonjour,

j'ai un soucis, j'ai besoin d'aide!!

voila j'affiche dans une textbox la date du jour (textbox1.value=datevalue(now))
je cherche a activer un bouton si l'année de cette date est 2009

If DateValue(Now) > 1 / 1 / 2009 And DateValue(Now) < 31/ 12 / 2009 Then
UserForm1.Frame12.OptionButton32.Value = True
End If

et le bouton 33 si c'est 2010 ect..

et ça marche pas

merci de votre aide precieuse