Mois en lettre à convertir en nombre
Bonjour,
Je suis en train d'aider un forumeur est je me casse les dents sur un truc qui semble simple de prime abord.
J'ai un une liste déroulante (activex) en feuil1.
Mon ComboBox1_Change() j'ai [B7] = Format(ComboBox1.Value, "m")
Je pensais retrouver 1 pour janvier en b7 mais il n'en est rien.
Une suggestion ?
Merci
Bonjour,
Mon ComboBox1_Change() j'ai [B7] = Format(ComboBox1.Value, "m")
Je pensais retrouver 1 pour janvier en b7 mais il n'en est rien.
Une suggestion ?
Merci
Bonjour,
Il ne faut pas reprendre la valeur de la combobox 1 puisqu'elle contient du texte.
Il faut reprendre l'index de la combobox. ( en se rappelant que l'index commence à la ligne Zéro ) 0 Janvier 1 Février 2 Mars
On ajoute alors +1 pour obtenir le résultat voulu.
Comme ceci par exemple :
Private Sub ComboBox1_Change()
Dim nummois As String
nummois = ComboBox1.ListIndex + 1
[B7] = nummois
End SubBonjour ddetp88, Steelson, le forum,
Une autre proposition.....à simplifier certainement,
Cordialement,
Edit:....bonjour Xmenpl...je me doutais bien qu'il y avait plus simple...
Merciiiii Steelson, Xmenpl et XorSankukai
@+
ddfpt88