Générer un code alphanumérique

[Jouxte]

Bonjour à tous,

Je souhaite générer un code alphanumérique aléatoire de X caractères.
X étant un nombre entre 4 et 25 suivant les applications.
Quelqu'un aurait-il une idée ?

 

[JCGL]

Re : Générer un code alphanumérique

Bonjour à tous,

Comment sont choisis les alphabétiques et les numériques : au hasard, tirés d'un libellé ?

A+ à tous

 

[hoerwind]

Re : Générer un code alphanumérique

Bonjour,

Pourrais-tu donner quelques exemples et les contraintes à respecter ?

 

[Jouxte]

Re : Générer un code alphanumérique

Bonjour et merci à vous deux de vous pencher sur mon problème.
En fait je souhaiterais créer une formule qui génère complètement au hasard cette suite de caractères alpha numériques.
Cette formule pourrait prendre la forme :
= alealphanum(nombre de caractères,VRAI)
Valeurs fixes (booléen, facultatif) : si VRAI, les valeurs renvoyées restent inchangées à chaque recalcul ; si FAUX (ou omis), ces valeurs sont automatiquement modifiées lors des recalculs (de la même manière que la fonction standard ALEA).

En espérant que ceci puisse vous inspirer.

 

[JCGL]

Re : Générer un code alphanumérique

Bonjour à tous,

Ne voulant pas refaire ce qui existe, je recherche, désespérément les codes que Pierre-Jean et Roger2327 avaient commis...

Il me semble qu'ils correspondaient à ce que tu cherches

Je continue...

A+ à tous

 

[Jouxte]

Re : Générer un code alphanumérique

Re,

J'ai fait un recherche mais n'ai rien trouvé de mon coté.

 

[Cousinhub]

Re : Générer un code alphanumérique

Bonsoir,

Salut, JC 🙂🙂

Jouxte, je pense que ta valeur booléenne ne sert à rien....

Le recalcul ne se fait que dans la cellule modifiée, et non dans les autres...

essaie ce code :

Function alpha(Nb As Integer)
zone = Array("48", "49", "50", "51", "52", "53", "54", "55", "56", "57", _
            "65", "66", "67", "68", "69", "70", "71", "72", "73", "74", "75", "76", "77", _
            "78", "79", "80", "81", "82", "83", "84", "85", "86", "87", "88", "89", "90")
For i = 1 To Nb
    Randomize Timer
    alpha = alpha & Chr(zone(Int((35 * Rnd))))
Next i
End Function

dans une cellule, tu entres, par exemple :

=alpha(8)

tu auras un code aléatoire...

maintenant, je sens poindre la question qui tue....

"Et sans doublons, c'est possible?"

Bonne soirée

 

[ROGER2327]

Re : Générer un code alphanumérique

Bonjour à tous

Lien évoqué par JCGL (merci au passage) :

Re...

Une proposition dans le classeur joint.
Pour des explications, voir :​

ROGER2327

Mais je ne sais pas si c'est vraiment ce qui est recherché...
​

ROGER2327

 

[JCGL]

Re : Générer un code alphanumérique

Bonjour à tous,
Salut Bh² 🙂🙂,

Et sans doublons, c'est possible... Arf Arf

Joli code, néanmoins...

A++ Hub 🙂🙂
A+ à tous

 

[JCGL]

Re : Générer un code alphanumérique

Bonjour à tous,
Bonjour Roger,

Pourrais-tu donner le lien ?

J'ai fait une recherche sur Roger2327 mais infructueuse

A++
A+ à tous

Merci BH² : il fallait la voir la petite flèche

 

[Jouxte]

Re : Générer un code alphanumérique

Bonjour bhbh, Bonjour JCGL, Bonjour Roger 2327, Bonjour Le Forum,

bhbh, Je ne vais pas te tuer car il peut y avoir des doublons, mais par contre j'ai essayé ton code dans ThisWorkbook et le résultat est #NOM?
le code ne fonctionnerait pas pour le classeur ? l'ai-je mal plaçé ?
Roger 2327, je n'ai pas vu le lien pourrais-tu le remettre ?

 

[kiki29]

Re : Générer un code alphanumérique

Salut, tu pourrais t'inspirer de Create GUID

 

[Jouxte]

Re : Générer un code alphanumérique

Re, je tape doucement , je n'avais pas vu les posts de JCGL.

 

[ROGER2327]

Re : Générer un code alphanumérique

Re...
https://www.excel-downloads.com/threads/generation-de-numeros-id-uniques.114584/
ROGER2327

 

[Jouxte]

Re : Générer un code alphanumérique

Re

Dans un module c'est mieux.

Merci beaucoup bhbh, ce code correspond parfaitement à l'usage que je souhaite en faire.

Merci à ceux qui ont travaillé sur ce sujet et qui avaient le souvenir de posts précedents.

Bonne soirée à tous et toutes.