Merci infiniment Nad
J'ai pu, après maints essais, inclure "définir nom"
Sub ligne()
Dim Lg As Integer
Range("A:A").Select
ActiveWorkbook.Names.Add Name:="formule", RefersTo:= _
"=match(4,len(a:a),0)"
Lg = [Formule]
MsgBox Lg
End Sub
si je rajoute ton bout de code, cela fonctionne très bien.
Il n'acceptait pas les termes français, j'ai du les changer.
Je devais l'inclure dans une macro, car l'usager n'a que.... une notion de base de Excel.
Encore un gros merci
Claire