Hallo liebe Community,
ich habe gerade als studentische Hilfskraft in einer Abteilung angefangen und beschäftige mich daher erst seit kurzem mit Excel VBA.
Ich möchte nun Mittelwerte aus der Spalte F bilden, wenn zwei Bedingungen erfüllt sind.
Beispielhaft sieht mein Makro dafür so aus:
Function Mittelwerte()
Worksheets("Berechnung").Range("A2").Value = WorksheetFunction.AverageIfs(Worksheets(2).Range("F6:F770"), Worksheets(2).Range("C6:C770"), "*possein", Worksheets(2).Range("D6:D770"), "12")
Worksheets("Berechnung").Range("I2").Value = WorksheetFunction.AverageIfs(Worksheets(2).Range("F6:F770"), Worksheets(2).Range("C6:C770"), "*posmein", Worksheets(2).Range("D6:D770"), "13")
End Function
Das funktioniert eigentlich auch einwandfrei. Nur wenn Excel keine Zelle findet, die beide Bedingungen erfüllt (was generell möglich ist) erhalte ich einen Fehler. Laut der Funktionsbeschreibung beim Office Support sollte ich den Fehlerwert #Div/0! erhalten, den ich ja einfach mit IfError umgehen könnte.
Blöderweise erhalte ich stattdessen die Fehlermeldung:
Laufzeitfehler "1004".:
Fehler der Methode "AverageIfs" des Objekts "WorksheetFunction".
und damit bricht Excel dann jedes Mal die Rechnung ab.
Weiß jemand, warum dieser Fehler auftaucht und wie ich den vielleicht umgehen kann?
|