Re!
Ah oui!
J'ai commis deux erreurs qui font que tu as un changement qui entraine un changement, qui entraine un changement.... et ça n'en finis plus, déjà, comme le propose Steelson , regarder si le changement arrive en colonne G, et pour ne pas relancer l'évènement quand on modifie, autant désactiver les évènements puis les réactiver après.
ça devrait donner:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lig As Long
lig = Target.Row
If lig >= 6 And Not Intersect(Target, Columns("G")) Is Nothing Then
Application.EnableEvents = False
Select Case Cells(lig, 7)
Case "moi", "toi"
Cells(lig, 13) = "X"
Cells(lig, 26) = "OK"
Case "nous"
Cells(lig, 13) = "X"
Cells(lig, 26) = "loupé"
End Select
Application.EnableEvents = True
End If
End Sub
à noter que la solution de Steelson permet de traiter toutes les cellules qui changent en colonne G, cette solution peut potentiellement être plus intéressante, je peux adapter mon programme pour faire ça aussi si tu le souhaites