J'ai des valeurs en colonnes A et B. Je voudrais en colonne C lister les valeurs qui se trouvent dans A mais pas dans B...

A adapter à ton cas :

sub extrait()
 x = 1
 For Each Cel In Range("A1:A5")
 Set Cherch = Range("B1:B2").Find(Cel)
  If Cherch Is Nothing Then
    Range("C" & x) = Cel
    x = x + 1
  End If
 Next
 end sub