Correction code vba

bonjour je reviens vers vous pour une correction sur un code en faite par une correction car je vous explique ma recherche par d un fichier global vers le fichier fich=fev2012 mais le probleme est qu il me ramene que le nombre de valeur trouve dans le fichier fev2012

ci joint le fichier et la macro
Sub macro4()

Sheets("GLOBAL").Select
For i = 14 To 20
If Cells(1, i) = Fich Then Exit For
Next
Cells(2, i).Select
ActiveCell.Formula = _
"=IF(ISNA(VLOOKUP(A2," & Fich & "!A:A,1,FALSE)),"""",""OK"")"
Selection.AutoFill Destination:=Range(Cells(2, i), Cells(NN, i))
End Sub