Bonjour

Voila une petite action que je n'arrive pas à faire en une ligne.

J'ai dans une cellule texte le mois en anglais sur 3 caractères (Jan, Feb ou May, ...)

Je voudrais en code pouvoir ressortir le numéro du mois.

Pour l'instant j'y arrive en bouclant sur une liste, mais je n'arrive pas à faire l'équivalent de ce que je fais dans une formule pour un mois en français :
=MOIS("1 " & A2 & " 2010").

Pour l'instant j'ai réussi jusqu'à ce code. Cela marche pour "Jan", mais pas pour "Feb" :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Dim MaDate As Byte
MaDate = Month(Format("1 " & Range("A1") & " 2010", "dd/MM/yyyy"))
Merci à vous.

Pierre