Générer un code numérique à partir de lettres

Fermé
Avidflyer - 20 sept. 2013 à 14:48
blux Messages postés 26580 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 7 janvier 2025 - 20 sept. 2013 à 17:40
Bonjour,

Je recherche un moyen permettant de transformer une série de 4 lettres en code numérique.

p.ex en A1 "HBDX" qui donnerai en A2 "72424"

A = 1
B = 2
C=3
..
Z=26
Je pense qu'on doit passer par VBA que je ne maîtrise pas !

D'avance un grand merci pour votre aide


A voir également:

4 réponses

f894009 Messages postés 17221 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 4 janvier 2025 1 712
Modifié par f894009 le 20/09/2013 à 15:35
Bonjour,

pas de VBA:

formule a mettre en A2: donne 82424 pas 72424 (H-->8)

=CODE(GAUCHE(MAJUSCULE(A1);1))-64&CODE(STXT(MAJUSCULE(A1);2;1))-64&CODE(STXT(MAJUSCULE(A1);3;1))-64&CODE(STXT(MAJUSCULE(A1);4;1))-64

code juste meme si vous entrez des minuscules

bonne suite
0
Ca c'est de la réponse rapide !

Un grand MERCI !!, ça fonctionne
0
blux Messages postés 26580 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 7 janvier 2025 3 323
20 sept. 2013 à 15:44
Salut,

sauf que l'opération inverse ne sera pas possible...
Comment considérer que 24 est X et et pas BD ?
0
f894009 Messages postés 17221 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 4 janvier 2025 1 712
20 sept. 2013 à 16:49
Bonjour Blux,

avec le code sur deux caracteres par lettre, decodage possible:

=TEXTE(CODE(GAUCHE(MAJUSCULE(A1);1))-64;"00")&TEXTE(CODE(STXT(MAJUSCULE(A1);2;1))-64;"00")&TEXTE(CODE(STXT(MAJUSCULE(A1);3;1))-64;"00")&TEXTE(CODE(STXT(MAJUSCULE(A1);4;1))-64;"00")

Bye
0
blux Messages postés 26580 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 7 janvier 2025 3 323
20 sept. 2013 à 17:40
Si on code sur deux caractères, je suis d'accord, mais autrement, pas possible...
0