bonjour ,

j'ai une colonne (B, dont le format des cellules est de type date) contenant des dates (au format ex 12/01/2009).
je souhaite ecrire une un code permettant de parcourir cette colonne ,et à chaque fois qu'une date correspond au mois de janvier, afficher "janvier" dans la colonne "A" .voici mon code qui ne me renvoi rien:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Sub ha()
Sheets("Feuil3").Select
For i = 2 To 40
 If Cells(i, 2) = "*/01/2009" Then Cells(i, 1) = "janvier"
Next i
End Sub
merci d'avance