|
Hallo zusammen,
ich bin neu hier, und auch neu in VBA, habe aber schon etwas geübt und in Excel kenne ich mich prima aus, aber nun ja...
Mein Problem: Ich möchte ein Makro erstellen, dass automatisch aus einer Liste von Produken aus dem Lager mit deren Rechnungsdatum eine Summe des Lagerwerts der Produkte von beispielsweise 0 bis 90 Tagen erstellt. Ich würde das mit der SumIfs Funktion machen. Normal in Excel schaffe ich es, jedoch muss ich das bei mehreren Tabellen machen, also insgesammt 16x, da erscheint mir VBA als besser Lösung..
Mein Programm, welches den Laufzeitfehler '13' - Typen unverträglich bringt hier:
Sub Makro1()
Value000090 = Application.WorksheetFunction.SumIfs(Range("T2:T78"), Range("L2:L78"), "<=" & _
Rows("2,2"), Range("L2:L78"), ">=" & (Rows("2,2") - "90"))
MsgBox Value000090
End Sub
Also in der Spalte T sind die Werte, in Spalte L das Rechnungsdatum bzw. Zubuchdatum und in Spalte 2 das Datum des Stichtages.
Ich bitte um Hilfe
Gruß Lukas
|