Bonjour,

Dans mon code VBA, je souhaiterais mettre une formule pour calculer le stock dynamiquement. La formule sans VBA est la suivante :

Code formule : Sélectionner tout - Visualiser dans une fenêtre à part
=RECHERCHEV(A4;Tab_stock;7;FAUX) - SOMME.SI(A$4:A4;A4;K$4:K4)

Pour la VBA, j'ai essayé de le faire avec cette formule :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim i As Long
 
For i = 4 To Worksheets("Data").Cells(Rows.Count, 1).End(xlUp).Row
 
Worksheets("Data").Cells(i, "R").formulaR1C1 = "=VLOOKUP(R" & i & "C[-17] ,Tab_stock,7,FALSE) - SUM.IF(Range(R4C[-17]:R" & i & "C[-17], A" & i & ", Range(R4C[-7]:R4C" & i & "))"
Next i

où i représente le nombre de lignes dans mon tableau. J'ai test avec plusieurs variantes, en enlevant les espaces etc, mais je ne suis pas parvenu à la solution.

Auriez-vous une idée ?

Merci d'avance!