Bonjour,
Pas sûr que ce soit ce que tu cherches par rapport au code de Tulipe car je ne vois réellement que la solution de Banzai comme celle qu'il te faut.
Toutefois en mettant un X dans une colonne à coté des cellules contenant du texte on peut utiliser le code proposé par Tulipe.
J'ai modifié ce code pour parer à l'éventualité d'une erreur.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("a1:a100")) Is Nothing Then
If IsEmpty(Target) Then
Target = "X"
Else: Target = ""
End If
End If
End Sub
Pour placer le code :
- Clique droite sur l'onglet concerné par le X
- Choisir l'option "visauliser le code"
- Coller le code ci-avant dans la fenêtre
Amicalement