Formule en VBA

Bonjour

je ne vois pas comment ecrire la formule suivante en vba :

J2=500*E73*MOD(D73-B73;1)*24

ainsi que celle ci :

J3=RECHERCHEV(L74;B.Données!K14:L50;2;FAUX)*24*MOD(K74-I74;1)

En vous remerciant pour tout aide ou conseil

Bonjour,

Par l'enregistreur de macro, ça donne ça

    Range("J2").FormulaR1C1 = "=500*R[63]C[2]*MOD(R[63]C[1]-R[63]C[-1],1)*24"
    Range("J3").FormulaR1C1 = "=VLOOKUP(R[71]C[2],B.Données!R[11]C[1]:R[47]C[2],2,FALSE)*24*MOD(R[71]C[1]-R[71]C[-1],1)"

Par contre si c'est simplement le résultat d'un calcul que tu veux exploiter dans du code, il te faut voir plutôt de ce côté là :

 'exemples
'modulo
a = 10 Mod 2
'fonction recherchev
Application.WorksheetFunction.VLookup

je te remercie infiniment , je vais examiner tout cela ! bonne soirée à toi

par contre j'aurai bien voulu savoir comment tu procede par macro pour pouvoir ecrire une formule ?

merci

Tu vas dans "Outils" > "Macros" > "Nouvelle macro" > "Enregistrer"

Ensuite j'ai collé tes formules dans 2 cellules

Ensuite même menu que précédemment et "Arrêter l'enregistrement"

et j'ai regardé ce que ca donne dans l'éditeur VBA (ALT+F11 pour afficher) et dans le module1

daccord , merci à toi j'en ai pris note , bonne journée