Passage formule Excel en VBA

Bonjour,

Pouvez-vous svp m'aider à modifier cette formule pour l'utiliser en VBA ?

=SIERREUR(SI(NBVAL([Ex_09_2021.xlsx]RawData!$B$3:$B$200000)-SOMMEPROD((JOURSEM([Ex_09_2021.xlsx]RawData!$B$3:$B$200000)<7)*1)>0;SOMME.SI.ENS([Ex_09_2021.xlsx]RawData!$L:$L;[Ex_09_2021.xlsx]RawData!$G:$G;$H$4;[Ex_09_2021.xlsx]RawData!$J:$J;$C9;[Ex_09_2021.xlsx]RawData!$B:$B;">="&$D$4;[Ex_09_2021.xlsx]RawData!$B:$B;"<="&$D$5;[Ex_09_2021.xlsx]RawData!$C:$C;">="&D$8;[Ex_09_2021.xlsx]RawData!$C:$C;"<="&E$8);0);"")

Merci d'avance

Pour que vous puissiez comprendre ma recherche, voici les fichiers utilisés