Bonjour à tous et à toutes,

j'ai un petit soucis, j'utilise deux boucles For pour calculer mon Lwas(niveau de puissance sonore) car Lwas dépend de la fréquence f ( plage de fréquence), de Lwcorr qui dépend lui meme de Lws (de plus à chaque f correspond un Lws) donc ma double boucle For doit surement s'emmeler les pinceaux et du coup j'obtiens beaucoup trop de resultat , jusqu'a 443 cellules alors que ma plage de fréquence et donc de Lws est limitée à 20 cellules, rajouter à cela que les valeur de Lwas sont fausses. Merci de votre aide





Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
 
For Each cellule In plageSource '<< A Ajuster à la plage ...
 
      For Each cell In plagesource2
             Lws = cell.Value
             f = cellule.Value
 
              teta = teta0 + (Ms / (485 * Sqr(f)))
              Lcorr = Lws - (20 * (Log(epaisseur / 0.2) / Log(10)))
              Lwas = Lcorr - (10 * (Log(2 * pi * f * Ms * teta) / Log(10))) + 26 + (10 * (Log(sgma) / Log(10)))
              i = i + 1
             Sheets(nomFeuilDest).Cells(i, 2).Value = Lcorr
             Sheets(nomFeuilDest).Cells(i, 10).Value = Lwas
        Next cell
 
 
 
   Next cellule