Ich möchte die Funktion Summenprodukt in VBA verwenden (in der Tabelle nur die entsprechenden Werte eintragen). Ich habe mir diese Formel zuerst mit dem Recorder aufgezeichnet und dann mal den ersten Teil (.Cells(5, 8) = WorksheetFunction.SumProduct) angepasst.
Mir ist nicht klar, wie ich die Argumente in den Klammern aufrufe.
Q_F, Q_VW und Q_B sind alles Bereiche in einer Tabelle namens "Import"
Link ist eine Zelle in einer Tabelle namens "Cockpit"
RC32 ist der Bezug auf Spalte AF der jeweiligen Zeile, wo dann der Eintrag erfolgen soll
Muss ich die Namen Q_F, Q_VW und Q_B dimensionieren?
Sub eintragen()
Dim zNr As Long
Dim iSheet As Worksheet
Set iSheet = ThisWorkbook.Sheets("Inventar")
strEND = Sheets("Inventar").Cells(65536, 4).End(xlUp).Row 'ermittelt letzten Eintrag _
in Spalte D
zNr = 8
Do While zNr > strEND
If .Cells(zNr, 4) "" Then
With iSheets
.Cells(ZNr, 5) = WorksheetFunction.SumProduct((Q_F = Link) * (Q_VW = RC32) * (Q_B))
zNr = zNr + 1
Loop
End With
End Sub