Macro VBA pour reproduire la touche F2 sur Excel

Bonjour à tous,

Je souhaiterais reproduire la touche F2 sur Excel via un code VBA.
La touche F2 permet de rentrer dans une cellule et de voir la formule à l'intérieur/la donnée brute.
De plus, pour une formule faisant référence à des cellules, cela montre où elles sont positionnées avec des couleurs.
(Il suffit de faire F2 sur une cellule Excel avec une formule pour voir ce que je veux dire si cela n'est pas clair).

J'ai essayé le code suivant, mais cela ne fonctionne pas : ActiveCell.FormulaR1C1 = "=R[-1]C"

Je vous remercie par avance pour votre aide.

Je vous souhaite une belle journée à tous.

Hello,

Pour "afficher" la formule, on doit la convertir en texte brut.
C'est réalisé en concaténant une simple cote avec la formule.

Par contre, pour rétablir la formule, bizarrement, il suffit de la réassigner à elle-même:

Code:

---

1 2 3 4 5 6 7

Sub ShowFormula(ByRef Rng As Excel.Range) Rng.Formula = "'" & Rng.Formula End Sub   Sub HideFormula(ByRef Rng As Excel.Range) Rng.Formula = Rng.Formula End Sub

---