Calcul itératif VBA - Evolution d'une concentration

Bonjour,

Je me permets de solliciter votre aide car cela fait très longtemps que je n’ai plus utilisé vba et je ne sais plus du tout m’en sortir.

Je travaille actuellement sur un problème sur un système d’épuration.
J’ai sur mon circuit principal qui contient une masse Mc = 25 t d’eau, un système de purification P qui épure à un débit Qp = 2 t/h.

Chaque jour, j’ai le matériau de mon circuit qui relâche par exemple 0,15g de fer, soit 0,006 ppm à t=0.
Pour simplifier l’approche calculatoire, je considère que ce relâchement a lieu ponctuellement à 0h00 chaque jour et que mon système de purification fonctionne 24h/24h.
Mon équation d’épuration est la suivante :

C_i =C_0i *exp(-(1-(1/pi))*(Qp/Mc)*t)

Où C_i est ma concentration de mon polluant (fer) à l’instant t et C_0i ma concentration initiale à t=0 (0h00 chaque jour).

Je souhaite connaître au bout de 365j à combien s’élèvera la concentration dans mon circuit. Je pense cela se fait assez facilement sur VBA avec une double boucle for mais je ne sais plus faire.
Cela revient, avec un modèle simplifié chaque jour à avoir : C0i + 1 = C0i (0,006 ppm) + C (23h59) du j-1

Je ne sais pas si je suis très clair. En gros j’épure chaque jours pendant 24h, il me restera toujours un talon de fer que j’additionne de jour en jour. Ma concentration C_0i à minuit de jour en jour sera donc de plus en plus importante.

Merci par avance pour votre aide.