En B2 j'ai une formule. Comment afficher dans une autre cellule la formule inscrite en B2 ?

Mets cette fonction perso dans un module ordinaire (pas un module de feuille)::

Function Afficheformule(x)
  Afficheformule = x.Formula
 End Function

en A2: =AfficheFormule(B2)