Conversion chiffres en mois

Bonjour à tous !
Svp existe t il en vb une fonction qui permet la conversion directement des chiffres (1 à 12) en mois?
exemple:1 en Janvier,2 en février
Merci

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. je ne sais pas si ça existe mais tu peux créer facilement une fonction qui fait ça.

    Public Function conversion(num As Integer) As String
    Select Case num
    Case 1
    conversion = "janvier"
    Case 2
    conversion = "février"
    Case 3
    conversion = "mars"
    Case 4
    conversion = "avril"
    Case 5
    conversion = "mai"
    Case 6
    conversion = "juin"
    Case 7
    conversion = "juillet"
    Case 8
    conversion = "aout"
    Case 9
    conversion = "septembre"
    Case 10
    conversion = "octobre"
    Case 11
    conversion = "novembre"
    Case 12
    conversion = "décembre"
    Else
    conversion = "erreur"
    End Select
    End Function

    tu peux l'essayer avec une userform et deux zones de textes
    et un bouton de commande

    1 ère zone de texte pour les numéro
    2 ème pour l'affichage des mois
    bouton de commande :

    Private Sub CommandButton1_Click()
    Text2.Text = conversion(val(Text1.Text))
    End Sub

    la fonction marche bien, tu peux la copier dans ton projet pour pouvoir l'utiliser.

    time is not money, time is life
    1. C'est typiquement le genre de fonction à programmer avec un tableau, quelque soit le langage. Avec un test sur la validité du numéro, pour pointer éventuellement sur la valeur erronée (selon le langage, d'indice [0] ou [13]).