Salut le forum!Voici une macro qui pemet de calculer une moyenne des valeurs contenue dans un tableau.
MAIS VOILA...
Excel calcul bien la somme des valeurs (via la variable moenne) Mais dés qu'il arrive à la ligne
resultat = moyenne / UBound(mesvaleurs) + 1
la variable resultat ~~"deconne"~~
Je ne sais quoi faire
Merci de m'aider ! ++
Code:
Sub pfff()
Dim mesvaleurs() As Double
Dim i As Integer
Dim j As Integer
Dim moyenne As Double
ReDim mesvaleurs(4 - 1)
For i = 1 To 4
mesvaleurs(j) = Cells(i, 3).Value
'MsgBox Cells(i, 3).Value
j = j + 1
Next i
MsgBox UBound(mesvaleurs)
moyenne = 0
Dim o
Dim valeur As Double
For o = LBound(mesvaleurs) To UBound(mesvaleurs)
valeur = mesvaleurs(o)
moyenne = moyenne + valeur
MsgBox moyenne
Next o
Dim resultat As Double
MsgBox moyenne
resultat = moyenne / UBound(mesvaleurs) + 1
MsgBox resultat
End Sub
MAIS VOILA...
Excel calcul bien la somme des valeurs (via la variable moenne) Mais dés qu'il arrive à la ligne
resultat = moyenne / UBound(mesvaleurs) + 1
la variable resultat ~~"deconne"~~
Je ne sais quoi faire
Merci de m'aider ! ++