Fonction personnalisée Alphabet

[amayze]

bonjour,
je cherche à créer une fonction personnalisé alphabet qui à partir d'une lettre me retourne un numéro (par exemple pour A il donnera 1 pour Z il donnera 26 et pour AB il donnera 28).
Car la difficulté est que j'essaie d'aller au delà de Z (je veux aller jusqu'à IV pour 256).
Existe il un moyen autre que celui de taper 256 case dans VBA?

Merci de votre réponse

 

[pierrejean]

Re : Fonction personnalisée Alphabet

bonjour amayze

vois si cela te convient

 

[amayze]

Re : Fonction personnalisée Alphabet

Merci de ta réponse mais je n'arrive pas à ouvrir la pièce jointe

 

[pierrejean]

Re : Fonction personnalisée Alphabet

Re

et pendant que nous y sommes

la fonction inverse: l'appelation de la colonne a partir de son numero

 

[amayze]

Re : Fonction personnalisée Alphabet

Excellent Pierre Jean
C'est exactement ce que je voulais.
Je vais essayer de faire l'inverse c'est à dire à partir du numéro obtenir la lettre
merci

 

[pierrejean]

Re : Fonction personnalisée Alphabet

Re

Voila sans Zip

 

[amayze]

Re : Fonction personnalisée Alphabet

Mille merci PierreJean
Mais j'essaie de refaire la fonction inverse (à partir de la lettre IV retourner 256) et je n'y arrive pas trop.
Pourrais tu m'apporter ton aide
Merci

 

[pierrejean]

Re : Fonction personnalisée Alphabet

Re

Vois le dernier fichier
Il y a la fonction:

Function lettre(num As Integer)
 lettre = Left(Cells(1, num).Address(0, 0), Len(Cells(1, num).Address(0, 0)) - 1)
End Function