Bonsoir
Avec le code nous ne visualisons rien, sauf lorsque nous changeons de cellule.
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Cells.Borders().LineStyle = xlNone
With ActiveCell.Borders()
.LineStyle = xlContinuous
.Weight = xlThick
.ColorIndex = 11
End With
End Sub
A remplacer dans la feuille " contour cellule "
Faire un click droit sur l'onglet, visualiser le code et coller celui ci a la place de l'existant