Autres Code VBA pour modifier contenu cellules de feuilles différentes

[BERNO]

Bonsoir
je recherche je pense une macro qui me permette lorsque je modifie le contenu d'une cellule d'une feuille soit modifier aussi dans une autre feuille et inversement.
Ci joint mon fichier test

Merci pour l'aide

Berno

 

[mapomme]

Bonjour @BERNO,

Voir les macros évènementielles dans le module de chaque feuille "Feuil1" et "Feuil2".
Dans Feuil1:

Private Sub Worksheet_Change(ByVal Target As Range)
   On Error Resume Next
   Application.EnableEvents = False
   If Not Intersect(Target, Range("d3")) Is Nothing Then Sheets("Feuil2").Range("a4") = Target
   On Error GoTo 0: Application.EnableEvents = True
End Sub

Dans Feuil2:

Private Sub Worksheet_Change(ByVal Target As Range)
   On Error Resume Next
   Application.EnableEvents = False
   If Not Intersect(Target, Range("a4")) Is Nothing Then Sheets("Feuil1").Range("d3") = Target
   On Error GoTo 0: Application.EnableEvents = True
End Sub

 

[BERNO]

Bonjour

Merci pour le retour, je vais faire des essais et l'intègrer dans mon projet ....

Bonnes fêtes

No