Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$C$7" Then
If Target.Value = "Indiquez votre recherche ici" Then Target.Value = ""
[C7].Font.Name = "colibri"
[C7].Font.Size = 11
[C7].Font.Color = RGB(1, 1, 1)
ElseIf Range("C7").Value = "" Then
Range("C7").Value = "Indiquez votre recherche ici"
[C7].Font.Name = "arial" 'Pour le fun change la police
[C7].Font.Size = 20 'Pour le fun change la taille de la police
[C7].Font.Color = RGB(180, 180, 180) 'Change la couleur de la police
End If
End Sub