Formule dans cellule

[dhiouf]

Bonjour à toute et à tous
est-il possible de convertir la procédure de la mocro suivante en formule dans cellule:
If Month(Date) = 11 And Date > CDate(ActiveSheet.Cells(1, 2)) And Date < CDate(ActiveSheet.Cells(1, 3)) Then
Range("A1").Value = ""
End If
End Sub
Merci d'avance

 

[Anne1969]

Re : Formule dans cellule

Bonjour,

un truc comme ça en A1 peut-être :
=SI(ET(MOIS(AUJOURDHUI())=11;AUJOURDHUI()>B1;AUJOURDHUI()<C1);"";"toto")

 

[dhiouf]

Re : Formule dans cellule

Re Anne1969
Merci de ta réponse,c'est ça que je cherche
Bonne Année 2007