Microsoft Excel

Herbers Excel/VBA-Archiv

Sumif mit aktueller KW und Zahl multiplizieren

Betrifft: Sumif mit aktueller KW und Zahl multiplizieren von: Sandra
Geschrieben am: 24.10.2014 14:49:23

Hallo Zusammen,

ich brauch ein Makro, dass die aktuelle KW in der Spalte D sucht und alle Produktionsmengen in dieser KW addiert. Der Wert soll dann mit 1000 multipliziert und in eine Zelle geschrieben werden. Dasselbe mit der nächsten und übernächsten Woche.
Mein Makro funktioniert nur bei der aktuellen KW und ich glaube auch nur, weil die KW nur einmal vorkommt. Des Weiteren bekomme ich das mit dem Multiplizieren nicht hin. Wo liegt mein Fehler?

Definition von zeile = Cells(Rows.Count, 3).End(xlUp).Row

Cells(zeile + 4, 3).Select
ActiveCell = "=SumIf(C[1], WEEKNUM(TODAY()), C[10])"
Cells(zeile + 4, 4).Select
ActiveCell = "=SUMIF(C[0],WEEKNUM(TODAY())+1,C[9])"
Cells(zeile + 4, 5).Select
ActiveCell = "=SUMIF(C[-1],WEEKNUM(TODAY())+2,C[8])"
Cells(zeile + 4, 6).Select
ActiveCell = "=SUMIF(C[-2],WEEKNUM(TODAY())+3,C[7])"

KW Produktionsmenge
41 70
42 100
42 100
42 90
43 100
44 70
44 70
45 30
45 70
47 400
47 70
47 60

Danke!

  

Betrifft: doppelt von: Rudi Maintaire
Geschrieben am: 24.10.2014 15:00:02




 

Beiträge aus den Excel-Beispielen zum Thema "Sumif mit aktueller KW und Zahl multiplizieren"