Chiffrer des lettres

Y compris Power BI, Power Query et toute autre question en lien avec Excel
j
jad73
Membre fidèle
Membre fidèle
Messages : 325
Inscrit le : 18 mai 2011
Version d'Excel : 2010

Message par jad73 » 28 mai 2019, 22:03

Bonjour le forum
Je cherche une formule pour attribuer des chiffres a des lettres.
J'ai aussi trouver sur le forum une macro mais elle ne fait que pour un mot.
Je joint un bout de fichier.
merci
Nomchiffré.xlsm
(17.72 Kio) Téléchargé 12 fois
Avatar du membre
78chris
Passionné d'Excel
Passionné d'Excel
Messages : 4'712
Appréciations reçues : 361
Inscrit le : 9 juillet 2017
Version d'Excel : 2010 à 2019 + 365

Message par 78chris » 28 mai 2019, 22:32

Bonjour

Tiens cela faisait longtemps qu'on avait pas eu de numérologie (il manque 11 et 22 le cas échéant)

Par formule
=CHOISIR(MOD(SOMMEPROD((MOD(CODE(STXT(MAJUSCULE(K2);LIGNE(INDIRECT(1&":"&NBCAR(K2)));1))-65;9)+1)*1);9)+1;9;1;2;3;4;5;6;7;8)
Modifié en dernier par 78chris le 28 mai 2019, 22:36, modifié 1 fois.
Chris
Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson.
Confucius
Avatar du membre
James007
Fanatique d'Excel
Fanatique d'Excel
Messages : 12'007
Appréciations reçues : 417
Inscrit le : 30 août 2014
Version d'Excel : 2007 EN

Message par James007 » 28 mai 2019, 22:34

Bonjour,

Ci-joint ta macro adaptée ...

En espèrant que cela t'aide
Nomchiffré.xlsm
(21.46 Kio) Téléchargé 11 fois
A+

:)

Quand on n’a qu’un marteau, tous les problèmes deviennent des clous…
Avatar du membre
eriiic
Passionné d'Excel
Passionné d'Excel
Messages : 9'308
Appréciations reçues : 370
Inscrit le : 7 février 2010
Version d'Excel : 2010fr

Message par eriiic » 29 mai 2019, 00:45

Bonjour à tous,

allez, par formule aussi pour se mettre en forme avant une bonne nuit :III :
=MOD(SOMMEPROD(MOD(CODE(STXT(MAJUSCULE(K2);LIGNE(INDIRECT("$1:$"&NBCAR(K2)));1))-65;9)+1)-1;9)+1
(je ne met que le résultat final directement)
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.
(les Shadoks)

En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
j
jad73
Membre fidèle
Membre fidèle
Messages : 325
Inscrit le : 18 mai 2011
Version d'Excel : 2010

Message par jad73 » 29 mai 2019, 23:40

Bonsoir
Merci pour vos réponses.
Mais il semblerait que les réponses ne soient pas exactes lorsqu'il y a un mot composé séparé(pont ramy).
Pour les dates comment faut-il faire.
Pour la macro elle aussi, elle affiche "erreur 91".
Merci
a+
Numé.xlsm
(20.27 Kio) Téléchargé 2 fois
Avatar du membre
eriiic
Passionné d'Excel
Passionné d'Excel
Messages : 9'308
Appréciations reçues : 370
Inscrit le : 7 février 2010
Version d'Excel : 2010fr

Message par eriiic » 30 mai 2019, 00:04

Bonjour,

elles sont exactes pour ce que tu avais demandé.
Tu as Supprespace() pour supprimer les espaces. Et avec substitue() tu peux supprimer d'autres caractères.
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.
(les Shadoks)

En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
Avatar du membre
James007
Fanatique d'Excel
Fanatique d'Excel
Messages : 12'007
Appréciations reçues : 417
Inscrit le : 30 août 2014
Version d'Excel : 2007 EN

Message par James007 » 30 mai 2019, 09:38

Bonjour à tous,

Salut Eriiic :wink:

Eric a entièrement raison ...

Tous les contributeurs ne font que s'en tenir à la requête du demandeur ...

Dire qu'il aurait simplement suffit que tu glisses ...les cas cités ...parmi tes 5 exemples ...

Ci-joint ta macro modifiée ...

En espèrant que cela t'aide
Nomchiffré V2.xlsm
(21.76 Kio) Téléchargé 9 fois
A+

:)

Quand on n’a qu’un marteau, tous les problèmes deviennent des clous…
t
tulipe_4
Passionné d'Excel
Passionné d'Excel
Messages : 8'522
Appréciations reçues : 225
Inscrit le : 1 janvier 2011
Version d'Excel : 2000 2007

Message par tulipe_4 » 30 mai 2019, 10:58

bonjour
une modeste contribution tardive
jad83.xlsx
(14.45 Kio) Téléchargé 5 fois
cordialement
c'est en cherchant qu'on trouve
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message