Hi,
ich bin's nochmal.
Das Makro funktioniert immer noch super. Allerdings haben sich mittlerweile die Anforderungen verändert.
Ich möchte immer noch den Mittelwert in jeweils 12er Schritten berechnen. Allerdings sollen nun nicht mehr immer alle 12 Werte berücksichtigt werden, sondern diese sollen nur berücksichtigt werden, wenn in einer weiteren Spalte (G) "ja" steht. Andernfalls steht in Spalte G "nicht".
Ich weiß nicht so recht, wie ich das gescheit einbauen kann. Bisher habe ich es mit folgenden Zusatz probiert:
1 2 3 4 5 6 7 8 9 10 | Dim rngJanein As Range
Set rngJanein = Columns(7).Cells(lngab)
Set rngJanein = Range(rngJanein), rngJanein.Offset(lngStep-1))
Do While Not IsEmpty(rngMwerte.Cells(1))
If rngJaNein(c).Value = "ja" Then
dblMwert = WorksheetFunction.Average(rngMwerte)
usw.
|
Also ich habe einfach den Bereich, indem Ja oder Nein steht (identisch zu rngMwerte, nur andere Spalte) hinzugefügt und dann wollte ich mit dem If-Befehlt das einschränken. Das klappt aber nicht. Ich kann das auch verstehen, da das If ja einzelne Zellen durchgeht und der Mittelwert für die gesamte Range gilt.
Ich vermute, dass ich dann also die Eingrenzung gleich mit bei der Festlegung der rng für die Mittelwerte treffen muss. Habe aber leider keine Ahnung wie das gehen soll...falls es so ist :)
Würde mich riesig freuen, wenn ich erneut so super Hilfe bekomme.
Liebe Grüße
susi
|