Bonjour,

J'ai une incompatibilité de type que je n'arrive pas à résoudre...
Certainement une erreur bête, mais je ne la vois pas

VOici mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Dim c As Range
 
    For Each c In Range("A1:P84")
 
        If Right(c.Value, 2) = "-A" Or "-B" Or "-C" Or "-D" Or "-E" Or "-F" Then
            c.Value = c.Value & "E"
        End If
 
    Next c
L'erreur se situe sur la ligne If Right(c.Value,2)..... etc...

Une idée ?