Phillip
XLDnaute Occasionnel
Bonjour,
Problème tout bête qui m'arrache les cheveux. Je veux trouver le mois en cours en lettres, et le mois suivant (février) en lettres. J'ai pondu le code suivant. Que je passe par une variable intermédiaire Moisprochain (qui d'alleurs me sort bien "2") ou directement avec now+1 dans le format, je sors systématiquement janvier !!
Merci du coup de pouce !
Cordialement
Phillip
Problème tout bête qui m'arrache les cheveux. Je veux trouver le mois en cours en lettres, et le mois suivant (février) en lettres. J'ai pondu le code suivant. Que je passe par une variable intermédiaire Moisprochain (qui d'alleurs me sort bien "2") ou directement avec now+1 dans le format, je sors systématiquement janvier !!
VB:
sub mois()
Vmoislettres = Format(Now, "mmmm")
'trouve le mois suivant le mois en cours
Moisprochain = Month(Now) + 1
'ces 2 lignes me donnent Janvier ! Pourquoi ?
VmoisprochainLettres=format(Moisprochain,"mmmm")
VmoisprochainLettres = Format(month(Now) + 1, "mmmm")
end subMerci du coup de pouce !
Cordialement
Phillip