Bonjour,
dans la création de formule sous VBA on "écrit" en anglais VBA du coup il faut mettre des "," en lieu et place des ";" me semble-t-il.
Ensuite il manque la valeur Dernlig qui lorsque j'ai lancé le code est égal à 0.
remplacez aussi le "SI" par "IF" et SIERROR par ISERROR, en fait la ligne est :
ActiveCell.Formula = "=IF(ISERROR(VLOOKUP(A2,Liste_Acte!A:A,1,0)),"""",""OK"")"
@ bientôt
LouReeD