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" :
Merci à vous.
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"))
Pierre
Partager