non je n'utilise pas formulalocal .. j'avais vu cette réponse dans des post plus anciens mais cela ne peut pas être ca
et comme je le disais dans ma question c'est la meme macro dans les 2 classeurs
For cpt = 2 To 20000
If Range("H" & cpt.Value = "" Then GoTo sortie_boucle
Range("I" & cpt).Select
If type_prod = "A" Then
ActiveCell.FormulaR1C1 = _
"=IF(ISNA(VLOOKUP(RC[-5]," & nom_feuille_facture & "!C[-3],1,FALSE)),""Manquant"",""Ok"")"
Else
ActiveCell.FormulaR1C1 = _
"=IF(ISNA(VLOOKUP(RC[-5]," & nom_feuille_facture & "!C[-3],1,FALSE)),""Manquant"",""Ok"")"
End If
Next cpt