X = Sheets("PLANNING").Cells(i, c)
If X = "Gj" Or X = "G" And X <> "GJ" Then
X = Sheets("PLANNING").Cells(i, c)
If X = "Gj" Or X = "G" And X <> "GJ" Then
Option Compare Text '<== c'est ici que tout ce passe
Sub toto()
'Blablabla
'Mon code qui va bien
End Sub