Fonction personnalisée ne marche plus

nouveaunom -  
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai créé une fonction qui me permettait de convertir un numéro de colonne vers le nom de colonne (ex : 150 donne ET).

Voici le code :

Function CONVERTLETTER(colnum As Double)

MyCell = [A1].Offset(0, colnum - 1).Address
CONVERTLETTER = Mid(MyCell, 2, Len(MyCell) - 3)

End Function

La fonction marche bien un moment, puis sans raison apparente lorsque j'ouvre à nouveau le fichier, la fonction renvoie #NOM?
J'ai essayé de réécrire la même fonction avec un nom différent, même schéma, ça marche puis d'un coup ça ne marche plus. C'est d'autant plus frustrant que je n'ai aucun moyen de savoir à quel moment du processus vient l'erreur : j'ai essayé de mettre des points d'arrête mais ça ne marchait pas.

Si quelqu'un peut m'aider, là je ne comprends plus du tout !

Merci



A voir également:

2 réponses

nouveaunom
 
J'ai en fait réussi à trouver la réponse tout seul, mais au cas où ça peut aider quelqu'un d'autre : j'avais nommé le module du même nom que la fonction, et c'est pour ça qu'excel ne reconnaissait pas la fonction.

Donc ne pas nommer ses modules avec un nom de fonction, maintenant je le saurais !
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Perso, j'utilise ceci, le 8 est juste pour le numero de ligne

Function CONVERTLETTER(colnum As Double)
    CONVERTLETTER = Split(Cells(8, colnum).Address, "$")(1)
End Function
0