Option Explicit 'En tête de module
Option Compare Text 'En tête de module pour comparaison insensible à la casse
Function IlyaDiff(Cellule1 As Range, Cellule2 As Range) As Boolean
IlyaDiff = True
If Not IsError(Cellule1) And Not IsError(Cellule2) Then IlyaDiff = Cellule1 <> Cellule2
End Function