Häufigkeitsfunktion funktioniert nicht richtig
01.11.2019 00:00:33
Tom
ich habe in VBA ein Problem mit der Häufigkeitsfunktion, welche die Häufigkeit von Messwerten in jeweiligen Klassen ausgeben soll.
Ich habe in der Datei 475 Messwerte, welche in 20 Klassen unterteilt sind. Wenn ich nun die Häufigkeit ausgeben will, zählt die Funktion allerdings nur insgesamt 56 Messwerte, die auf die 20 Klassen verteilt sind.
Komischerweise hat die Funktion allerdings bereits funktioniert und tut es mittlerweile nicht mehr, obwohl ich mir keine Änderung erklären kann, die dies verursacht.
Der Aufruf der Funktion sieht dabei wie folgt aus:
Sheets("Daten").Range(Cells(2, iColClass), Cells(iRowClass, iColClass)).Value = WorksheetFunction.Frequency(Range(Cells(2, iCol), Cells(iRow, iCol)), Range(Cells(2, iColClass - 1), Cells(iRowClass, iColClass - 1)))
Die Variablen definieren sich so:
iColClass = 22 (Spalte, in der die Häufigkeiten ausgegeben werden)
iRowClass = 21 (Zeile der letzten Klasse)
iColClass - 1 = 21 (Spalte mit den Klassen)
iRow = 476 (letzte Zeile mit Messwerten)
iCol = 1 (Spalte der Messwerte)
Ich hoffe, mir kann hierbei jemand weiterhelfen,da ich langsam am verzweifeln bin ^^
Vielen Dank im Voraus,
Tom