Reconnaissance du premier jour d'un mois

[Fab117]

Bonjour,
Dans une cellule donnée contenant une date, est-il possible avec une macro de vérifier s'il s'agit du premier jour du mois (soit le 01.mm.aaaa).
Merci d'avance.

Fab

 

[ninbihan]

Re : Reconnaissance du premier jour d'un mois

Rebonjoujour Fab

Peut être ainsi:

Sub essai()
If Day(ActiveCell) = 1 Then MsgBox "OK"
End Sub

Bon après midi,

Ninbihan

 

[fanfan38]

Re : Reconnaissance du premier jour d'un mois

Re,

Ninbihan je mettrai day(cdate(activecell))...

A+ François