Validation de données

Bonjour,

Je suis a la recherche d'un code pour:

J'ai une feuille "Flag" ou il y a des drapeaux et une feuille "Liste ou j'ai des validations de données qui correspond au non des drapeaux en colonne "G" et en colonne "H" j'ai des contrôles images.

Tous les drapeaux sont nommé par les noms des pays correspondant.

J'aimerai que lorsque j'affiche un nom de pays dans la validations de données le drapeaux correspondant s'affiche dans le contrôles

images.

Je vous remercie de votre aide

Cordialement

Max

Re,

Personne peut m'aider?

@+

Max

Re,

Si quelqu'un sa intéresse le code :

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 8 And Target.Count = 1 Then
    '-- suppression
    For Each s In ActiveSheet.Shapes
      If s.Type = 13 Then
        If s.TopLeftCell.Address = Target.Offset(0, 2).Address Then 'Offset(0, 1)1er colonne aprés la colonne H
          s.Delete
        End If
      End If
    Next s
    '--
    If Target <> "" Then
        Sheets("Flag").Shapes(Target).Copy
        Target.Offset(0, 2).Select
        ActiveSheet.Paste
        Selection.ShapeRange.Left = ActiveCell.Left + 17
        Selection.ShapeRange.Top = ActiveCell.Top + 5
        Target.Select
     End If
  End If
End Sub

@+

Max

bonsoir

en attendant du vba

cordialement