Ich suche einen Mittelwert/Durchschnitt von den Monaten Januar bis Dezember
Die Werte stehen in D4 bis D15
Sub UseFunction() Dim myRange As Range Set myRange = Worksheets("Zusammenfassung").Range("D4:d15") answer = Application.WorksheetFunction.Average(myRange) MsgBox answer End Sub
Es soll also so sein: Jan = 10 Feb 20
Das Ergebnis sollte dann 15 sein es kommt aber immer 10 raus.
Mein Problem ist dieses Makro aus der Online-hilfe gibt immer den Januar-Wert
aus egal ob ich min, max oder average eintrage?
Gruß
Manfred