récupérer nom d'une cellule

[Jean-Phi]

Salut le forum !!

je viens de parcourir le forum et l'aide d'Excel et rien pour le moment.. Voilà la situation : j'ai nommé une cellule, par exemple "toto" à la celule "A1" et je voudrais récupérer le nom de cette cellule dans mon code VBA.
Pb quand j'utilise range("A13).Name, j'ai droit à un magnifique "Feuil1!$A$1" et pas le nom toto !!!

je continue à chercher, si quelqu'un a une idée, elle est la bienvenue ! ;-)

Merci d'avance,

Jean-Phi

 

[sousou]

Bonjour jean-phi.

Etrangement pas simple !!
Mais tout est possible en rusant un peu.


A supposer que je recherche le nom de la cellule "b4"........

Sub test()
ad = Range("b4").Address

For Each i In Names
If i.RefersToRange.Address = ad Then
MsgBox "ma cellule est " & i.RefersToRange & " et son nom est " & i.Name
End If
Next
End Sub

 

[Michel_M]

Salut Jean Phi, salut Sousou

essaies ceci:

inconnu=range("A1").Name.Name

trouvé avec l'espion du débogueur sur "inconnu"

A+
Michel

 

[Jean-Phi]

Salut le forum, salut Michel et Sousou,

Merci pour les réponses, c'est impeccable !!

@+

J-Phi