Re Luna (c'est plus court
)
J'ai fait l'essai avec Jean, ça me donne bien 12
Je reprends la formule :
=MOD(CODE(STXT(B1;1;1))-65;9)+1+SI(NBCAR(B1)>1;MOD(CODE(STXT(B1;2;1))-65;9)+1)+SI(NBCAR(B1)>2;
MOD(CODE(STXT(B1;3;1))-65;9)+1)+SI(NBCAR(B1)>3;MOD(CODE(STXT(B1;4;1))-65;9)+1)+SI(NBCAR(B1)>4;
MOD(CODE(STXT(B1;5;1))-65;9)+1)+SI(NBCAR(B1)>5;MOD(CODE(STXT(B1;6;1))-65;9)+1)+SI(NBCAR(B1)>6;
MOD(CODE(STXT(B1;7;1))-65;9)+1)+SI(NBCAR(B1)>7;MOD(CODE(STXT(B1;8;1))-65;9)+1)+SI(NBCAR(B1)>8;
MOD(CODE(STXT(B1;9;1))-65;9)+1)+SI(NBCAR(B1)>9;MOD(CODE(STXT(B1;10;1))-65;9)+1)
En fait limitée à 10 caractères. Pour aller plus loin, il faut rallonger la formule :
pour un prénom de 11 lettres, il faut ajouter à la fin :
+SI(NBCAR(B1)>10;MOD(CODE(STXT(B1;11;1))-65;9)+1)
pour 12 :
+SI(NBCAR(B1)>11;MOD(CODE(STXT(B1;12;1))-65;9)+1)
etc.
Le problème, c'est que les formules dans Excel sont limitées à 1024 caractères. Dans le cas présent, on a encore de la marge, mais la formule devient quand même un peu indigeste, même si elle est efficace.
Attention aux prénoms composés : dans la formule, il ne faut pas saisir de tirets ou d'espaces.
@+