Récupération de mise en forme

[Photosol]

Bonjour,

J'ai un soucis au niveau de mises en formes dans un tableau.

Je souhaiterais que lorsque j'ajoute un nom (par exemple: Pierre) dans une case,
si il y a déjà un autre pierre dans le tableau, le nouvel entrant prenne automatiquement la forme de l'ancien,
au niveau de la mise en forme et des commentaires.

Pensez vous que cela soit possible?

Merci beaucoup!

 

[Photosol]

Re : Récupération de mise en forme

En fait j'ai trouvé tout seul la réponse!

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([B2:B5], Target) Is Nothing Then
Application.EnableEvents = False
On Error Resume Next
[Liste].Find(Target, LookAt:=xlWhole).Copy Target
Target.Validation.Add xlValidateList, Formula1:="=Liste"
Application.EnableEvents = True
End If
End Sub