Lecture d'une référence ActiveWorkbook.Names

Bonjour à tous,

Mon problème idiot du jour :

Dans ma feuille de calcul j'ai des "Variables" enregistrées dans le "Gestionnaire de noms"

Je les crée via une ligne de code VBA en référence à des cellules :

 
 'vnHO = le contenu de G3 =>  Monclient
    ActiveWorkbook.Names.Add Name:="vnHO", RefersTo:=ThisWorkbook.Sheets("Variables").Range("G3")

Puis je les lis :

test = ActiveWorkbook.Names("vnHO")

Mais dans "test" j'obtiens la référence à la cellule, pas sa valeur

Soit "=Variables!$G$3" au lieu de "Monclient"

Je suis sur que c'est très simple, mais je sèche ...

Merci de votre aide !

Pierre

Bonjour PierreM31,

Après la parenthèse fermante. Ajouter ceci

. Value

Bonjour, merci de ta réponse,

J'avais essayé mais j'ai le même résultat :

test = ActiveWorkbook.Names("vnHO").Value

Copié-collé de "l'espion" :

test : "=Variables!$G$3" : Variant/String

Et en $G$3 j'ai bien "Client"

A nouveau,

Mais après workbook. Il doit manquer Range. Car on appelle une l'adresse d'une cellule me semble t'il. Et donc sa propriété Value.

Bonjour

A voir avec Range

Sub Testrange()
    MsgBox Range("vnHO")
End Sub

A+

Maurice

Range fonctionne, merci !

Et entre temps j'ai trouvé une autre solution : Evaluate

Evaluate(ActiveWorkbook.Names("vnHO").Value)

Merci à tous,

Pierre

A nouveau

En effet je n'étais pas sur l'ordi. Je viens de vérifier.

Mais Workbook était en trop. C'est Range((Names("vnHO")).Value

Bonjour,

Il manque bien le .Value mais dans la création :

Sub test()

ActiveWorkbook.Names.Add Name:="vnHO", RefersTo:=ThisWorkbook.Sheets("Variables").Range("G3").Value

End Sub

A+