Bonjour à tous,
J'ai ces deux valeurs :
0,870%
0,55%
J'essaie d'effectuer la moyenne de ces deux valeurs, cela devrait me donner 0.710%
J'obtiens 0,0071 et non pas 0.710
Voici mon code :
Merci d'avance pour l'aide.
bee
J'ai ces deux valeurs :
0,870%
0,55%
J'essaie d'effectuer la moyenne de ces deux valeurs, cela devrait me donner 0.710%
J'obtiens 0,0071 et non pas 0.710
Voici mon code :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 And Not Intersect(Target, Range("F15:Q15")) Is Nothing Then
Dim ligne As Integer
Dim moyenne As Long
'va contenir la ligne sur laquelle on est
ligne = ActiveCell.Row
'MsgBox (ActiveSheet.Range("D15").Value)
'MsgBox (Range(ligne, 5))
MsgBox Application.Average(Range(Cells(ligne, 4), Cells(ligne, 5)))
'MsgBox moyenne
End If
End SubMerci d'avance pour l'aide.
bee