Fonction personnalisée Alphabet

amayze · 25 Mars 2008

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 · 25 Mars 2008

Re : Fonction personnalisée Alphabet

bonjour amayze

vois si cela te convient

amayze · 25 Mars 2008

Re : Fonction personnalisée Alphabet

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

pierrejean · 25 Mars 2008

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 · 25 Mars 2008

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 · 25 Mars 2008

Re : Fonction personnalisée Alphabet

Re

Voila sans Zip

amayze · 25 Mars 2008

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 · 25 Mars 2008

Re : Fonction personnalisée Alphabet

Re

Vois le dernier fichier
Il y a la fonction:

Code:

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

Fonction personnalisée Alphabet

amayze

XLDnaute Nouveau

Pièces jointes

pierrejean

XLDnaute Barbatruc

Pièces jointes

amayze

XLDnaute Nouveau

pierrejean

XLDnaute Barbatruc

Pièces jointes

amayze

XLDnaute Nouveau

pierrejean

XLDnaute Barbatruc

Pièces jointes

amayze

XLDnaute Nouveau

pierrejean

XLDnaute Barbatruc

Discussions similaires