MFC Excel

Résolu/Fermé
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 - 28 août 2012 à 15:44
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 - 28 août 2012 à 17:01
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
A voir également:

5 réponses

Morgothal Messages postés 1236 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 19 mai 2015 183
28 août 2012 à 15:47
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
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 12
28 août 2012 à 15:53
Bonjour,

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

cordialement
0
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 12
28 août 2012 à 15:58
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
Morgothal Messages postés 1236 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 19 mai 2015 183
28 août 2012 à 16:14
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

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 12
28 août 2012 à 16:27
Super merci mille fois
ça marche super, j'ai adapter l'exemple joint

merci

Cordialement
0
Morgothal Messages postés 1236 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 19 mai 2015 183
28 août 2012 à 16:32
N'oublie pas de marquer le sujet comme résolu :)
0
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 12
28 août 2012 à 16:38
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
Morgothal Messages postés 1236 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 19 mai 2015 183
28 août 2012 à 16:50
Avec :
For j = 1 to Range("A65536").End(xlUp).Row
En adaptant bien sûr la colonne (ici A)
0
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 12
28 août 2012 à 17:01
Super merci encore mille fois

Cordialement
0