Adaptation de formule en code VBA

Bonjour,

Je cherche à remplacer des formules, actuellement utilisées dans un tableau, par des codes vba pour faire tourner une macro qui actualisera toutes ces formules.

Voici mes formules (une par colonne) :

=[Commande]&[Lig Cde]

=SI(ESTERREUR(RECHERCHEV([@[Code Ord. Off.]];Tableau7[#Tout];2;FAUX));"RC CONVERGENCE";RECHERCHEV([@[Code Ord. Off.]];Tableau7[#Tout];2;FAUX))

=SI(OU(GAUCHE([@[Commentaire Client]];2)="L3";GAUCHE([@[No Suivi]];2)="L3");"L3";"")

=SIERREUR(RECHERCHEV([@[IT]];Tableau5[#Tout];2;FAUX);SI([@[Réf Art Fournisseur]]="";"NRC";"Znon attribuée"))

=SI(ANNEE([@[Date Promise]])<ANNEE($DE$11);"date non collaborée";SI(NO.SEMAINE.ISO([@[Date Promise]])<NO.SEMAINE.ISO($DE$11);"date non collaborée";NO.SEMAINE.ISO([@[Date Promise]])))

=SI([@[Date Demandée]]+15<$DE$11;"oui";"non")

J'ai bien essayé mais honnêtement la je ne m'en sort pas du tout, je bloque depuis un bon moment. Pouvez-vous m'aider?

Voici le fichier.

Les formules sont dans les colonnes CALCUL (en tête en gris) de l'onglet Retard AirSupply.

Bonjour,

help?

Rechercher des sujets similaires à "adaptation formule code vba"