MFC Excel

Résolu
Bonjour,

voila j'ai tableau composé de chiffre je souhaiterais remplacer les chiffres par des mots et pour cela j'aimerais utiliser une mfc,

exemple:

A2:A7 = 10,11,12,13,14,15 un chiffre par cellule
je souhaiterais une mfc qui me permet de remplacer 10 par toto et 11 par tata et ainsi de suite

merci de votre aide

Cordialement

5 réponses

  1. Salut,
    Si tu as un tableau de correspondance, tu peux le faire avec RECHERCHEV...

    Une MFC, comme son nom l'indique ne change que la mise en forme de la cellule.
    0
    1. Bonjour,

      ok merci de votre aide et de cette information sinon oui j'ai un tableau de correspondance

      cordialement
      0
      1. j'ai trouvé une fonction qui me permet de remplacer les chiffre mais comment je peu l'appeler depuis un bouton pour quelle me remplace tout les chiffres

        ma fonction

        Function test(colonne As String) As String

        Select Case (colonne)
        Case "10"
        test= "toto"
        Case "20"
        test= "tata"
        End Select

        End Function

        cordialement
        0
        1. Une fonction créée en VBA ne renvoie qu'un résultat...

          *Soit on utilise la fonction RECHERCHEV pour afficher une valeur en fonction d'une autre (via le tableau de correspondance)

          *Soit on créé une fonction pour remplacer la valeur case par case

          *Soit on créé un programme VBA pour tout gérer via un bouton

          Si c'est cette dernière proposition qu'il faut, voir cet exemple.
          0
          1. Super merci mille fois
            ça marche super, j'ai adapter l'exemple joint

            merci

            Cordialement
            0
            1. N'oublie pas de marquer le sujet comme résolu :)
              0
            2. c'est fait,

              juste une dernière question SVP, comment je peu remplacer ca : For j = 1 To 150

              par ca : For j = 1 To la derniere cellule pleine.

              merci de votre aide

              Cordialement
              0
            3. Avec :
              For j = 1 to Range("A65536").End(xlUp).Row
              En adaptant bien sûr la colonne (ici A)
              0
            4. Super merci encore mille fois

              Cordialement
              0