ich habe eine Frage bezüglich des Arithmetischen Mittel in VBA
Den Code habe ich soweit hinbekommen mir fehlt nur das der Wert durch die Anzahl der der Eingegebenen
Werte dividiert wird.
Hier mal mein Code
Sub Berechnen()
Dim Zeile As Integer
Dim Wert As Long
Zeile = 4
Wert = 0
Do Until IsEmpty(Cells(Zeile, 1))
Wert = Wert + Cells(Zeile, 1)
Zeile = Zeile + 1
Loop
Cells(5, 3).Value = Wert
End Sub
Danke schonmal im Voraus für eure Hilfe.
LG Fabio