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
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
Dernière édition: