* Bonjour, *

dans mon programme je fais une boucle pour calculer des Lp(niveau de pression):

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
For i = 5 To 25
         Alpha_béton = Worksheets("Feuil4")
 
         Lwatot = Worksheets("Feuil3").Range("N" & i - 3)
         A = Alpha_béton * ((2 * CDbl(UserForm1.TextBox7.Value) 
 
         Lp = Lwatot + 6 - (10 * (Log(A)) / Log(10))
         J = J + 1
         ThisWorkbook.Worksheets("Feuil3").Cells(J, 15).Value = Lp
Next i
et je souhaiterai calculer directement dans ma boucle le Lp global en faisant ce calcul dans ma boucle :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Lp_global=10*log(10^(0.1*Lp1)+10^(0.1*Lp2)+...+10^(0.1*Lpn)
Lp1 Lp2...Lpn étant les 20 valeurs de Lp calculées dans ma boucle.

* Merci *