Convertir formule en VBA

Fermé
F60lebaladinverni Messages postés 128 Date d'inscription samedi 28 janvier 2017 Statut Membre Dernière intervention 16 juin 2024 - Modifié le 16 sept. 2020 à 14:27
yg_be Messages postés 23352 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 27 novembre 2024 - 16 sept. 2020 à 16:07
Bonjour, je souhaitais convertir la formule suivante en VBA :
=CELLULE("adresse")

L'enregistreur de macro écrit ça :
ActiveCell.Formula2R1C1 = "=CELL(""adresse"")"


La finalité pour l'expliquer est d'écrire dans une cellule :
"Untel a modifié la cellule F16

J'ai écrit donc écrit ça :
Cells(3, 1) = Environ("username") & " a modifié la cellule " & "=CELL(""adresse"")"

Mais ça sort ceci :...
nomDeLaPersonne a modifié la cellule =CELL("adresse")


Merci pour votre aide

1 réponse

yg_be Messages postés 23352 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 27 novembre 2024 Ambassadeur 1 554
Modifié le 16 sept. 2020 à 15:56
bonjour,
l'adresse de quoi?
nous pourrons mieux t'aider si tu montres le code autour.
1
yg_be Messages postés 23352 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 27 novembre 2024 1 554
16 sept. 2020 à 16:07
peut-être ainsi:
Private Sub Worksheet_Change(ByVal cible As Range)
Application.EnableEvents = False
Cells(3, 1) = Environ("username") & " a modifié la cellule " & cible.AddressLocal
Application.EnableEvents = True
End Sub
0