Discussion :

[lanfeust41]

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

[mapeh]

Bonjour,

Si j'ai tout compris....

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

Bonne journée

[lanfeust41]

Merci mapeh
ça répond parfaitement à mes attentes

Bonne journée