Excel Function til at skrive celle Name!!!!!!!! Hjælp

Jeg har et Ark med Tekster til et persondata register
Eks
B1 med indhold "Vil du gemme det?" som er Navngivet  tLikeToSave
B2 med indhold "Emailen er forkert" som er Navngivet  tWrongEmail

Nu ønsker jeg en function i A1 og A2 osv.  =VisNavn($B$1)
så det er nemt at se cellenavnet når jeg skriver makroer,
grunden til at cellerne er navngivet er at det måske skal anvendes på et andet sprog.

har selv prøvet med , men nej
Function VisNavn(cell as Range)
  VisNavn = cell.Name
End Function

nogen kvikke hoveder
på forhånd tak
Finn