Récupérer numéro de mois en vba

Bonjour,

Je veux faire un traitement particulier sur des colonnes, présentant des résultats pour chaque mois, en fonction du mois courant.

En haut de chaque colonne, j'ai le mois écrit en texte (ex : avril)
Je récupère donc le numéro de mois courant avec Month(Date)
Et je voudrais le comparer en récupérant le numéro de mois de la colonne

J'ai trouvé une formule qui me permet de le faire :
=MOIS(DATEVAL(1&" "& A1 &" "&2010)) où A1 est la cellule contenant le mois en texte

et je voudrais maintenant exécuter cette formule en VBA

D'où ma question :
Comment utiliser l'objet WorksheetFunction pour exécuter cette formule en particulier ?

Voilà vous savez tout ;)
Merci d'avance pour votre aide

Bonjour,

Si j'ai tout compris....

Code:

---

1 2 3 4

Sub mois() Dim LeMois As Byte LeMois = Month(CDate("01/" & [A1])) End Sub

---

Bonne journée

Merci mapeh
ça répond parfaitement à mes attentes :)

Bonne journée