Bonsoir
petite erreur sur la macro, le non de la macro a l'air d'être "cacher_cell"
verifie en l'orthographe et ca doit fonctionner
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("B5")) Is Nothing Then
Call cacher_cell
End If
End Sub
Cordialement