Kann mir jemand sagen wo hier der Fehler ist?
For b = 1 To 6
For c = 2 To a - 1
Cells(c, b + 1).Value = Application.WorksheetFunction.SumIf(Workbooks(files(b)).Worksheets(1). _
Range(Cells(1, 27), Cells(1, 27).End(xlDown)), Cells(c, 1).Value, Workbooks(files(b)).Worksheets(1). _
Range(Cells(1, 1), Cells(1, 1).End(xlDown)))
Next c
Next b
Vielen Dank im Voraus!
Gruß
Dominic