using Right(String,2), but it doesn't succeed. Can somebody look at my code? (3 rows)

[makiwara]

If Cells(i, 2).Value = "n" Then
If Right(Cells(i, 1).Value, 2) = "sh" Or "ch" Then 'TYPE MISMATCH?
Cells(i, 3).Value = Cells(i, 1).Value & "es"

It shows an error message of "Type Mismatch" could you help me what am i doing wrong? Have a nice day!

 

[JoeMo]

Try:

If Right(Cells(i, 1).Value, 2) = "sh" Or Right(Cells(i, 1).Value, 2) = "ch" Then

 

[Rick Rothstein]

Another way...

If Cells(i, 1).Value Like "*[sc]h" Then