SumIfs
10.06.2016 13:11:43
Noureddine
stehe gerade auf nem Schlauch.
Könnt Ihr mir hierbei helfen?
Ich find den Tippfehler bzw. Syntax-Fehler nicht.
Danke vorab und entschuldigt das Format. Schreibe mit dem Handy.
With Sheets("Calcs")
For WhileS = 3 To 4
For WhileZ = 4 To 8
Cells(WhileZ, WhileS).Value = Application.WorksheetFunction.SumIfs(.Range(Cells(2, _
12), Cells(LetzteZeileC, 12)), _
.Range(Cells(2, 11), Cells(LetzteZeileC, 11)), Cells(WhileZ, 2), .Range(Cells(2, 1), _
Cells(LetzteZeileC, 1)), Cells(2, WhileS) _
.Range(Cells(2, 8), Cells(LetzteZeileC, 8)), Cells(3, 2))
Next WhileZ
Next WhileS
End With
Anzeige