Clonage liste deroulante

Bonjour à vous toutes et tous,

je ne sais pas si c'est possible car j'ai chercher et je n’ai pas trouver ce que je cherche si évidement cela est possible.

est ce possible lorsque je clic sur liste déroulante Feuil1 A1 et que les listes déroulantes A1 des feuilles 2 et 3 se mettent a jour, jusqu'ici , je sais faire, par contre si je devais le faire a partir de la liste Feuil3 et bien que les liste déroulante Feuil 1/2 se mettent a jour , idem avec, la Feuil2 pour les feuil 1/3.

en Résumé quelque soit la liste déroulante que j’utilise des Feuil 1/2/3 , les 3 sont identiques.

j’espère que cette demande est comprise.

para avance merci a vous et prenez soins de vous.

cordialement

Bonjour,

copier les macro suivante:

sur la page code de la Feuil1

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
    Application.EnableEvents = False
    Sheets("Feuil2").Range("A1") = Target.Value
    Sheets("Feuil3").Range("A1") = Target.Value
    Application.EnableEvents = True
End If
End Sub

sur la page code de la Feuil2

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
    Application.EnableEvents = False
    Sheets("Feuil1").Range("A1") = Target.Value
    Sheets("Feuil3").Range("A1") = Target.Value
    Application.EnableEvents = True
End If
End Sub

sur la page code de la Feuil3

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
    Application.EnableEvents = False
    Sheets("Feuil1").Range("A1") = Target.Value
    Sheets("Feuil2").Range("A1") = Target.Value
    Application.EnableEvents = True
End If
End Sub

merci infiniment , cela fonctionne tres bien sur mon classeu de destination.

prenez bine soins de vous et de vos proches

bien cordialement

Rechercher des sujets similaires à "clonage liste deroulante"