Détecter une valeur donnée dans une plage en vba

Ok merci. Mais le problème c'est que MFC est très fragile. Le fait de changer format (Bordure par exemple) des cellules concernées. Leurs MFC s'effacent.

Comment faire pour protéger la MFC d'une plage de cellules.

Comment faire pour protéger la MFC d'une plage de cellules?
La MFC s'écrase lorsqu'on passe par clique bouton droit de la sourie--->format des cellules-->Bordure.
Mais Bordure direct du ruban, ne l'écrase pas.

Si je peux avoir un code vba c'est plus sûr. Merci bcp

J'ai utilié ce code mais ça se bloque au niveau de : If c = Cells( i , 1) Then

With Worksheets("Preparation Emplois").Range("M5:T7")
For i = 10 To 14
For j = 13 To 20
Set c = .Find(Cells(i, 1), LookIn:=xlValues)

If c = Cells( i , 1) Then ' ça ce bloque ici'

Cells(i, j).Interior.ColorIndex = 43
End If
Next j
Next i
End With

Mais s'il s'agit d'une seule cellule, ça marche
Çàd: Cells(10 , 1) au lieu de Cells( i , 1)

à condition que la valeur de Cells(10,1) est trouvée dans la plage. Si non il réclame erreur.

Y'a t-il une correction s'ils vous plait ?

@59BzikJe suis arrivé au bout de mes compétences, comme je le disais je ne connais pas du tout le langage VBA, essaie de ton coté de faire avec l'enregistreur de macro.

Maintenant je te laisse aux bons soins des spécialistes en la matière.

Bonne continuation
Cordialement

Ok merci. j'ai trouvé la solution

With Worksheets("Preparation Emplois").Range("M5:T7")
For i = 10 To 144
For j = 13 To 20
Set c = .Find(Cells(i, 1), LookIn:=xlValues)
If c Is Nothing Then Cells(i, j).Interior.ColorIndex = 0
Next j
Next i
End With

@59BzikBonjour

C'est bien tu as trouvé ta solution -
Si c'est le cas n'oublie pas de marquer le fil en résolu

Cordialement