Ausgangsbasis ist eine SUMMEWENN-Formel (Datei-übergreifend), die ich in einem Spaltenbereich eingetragen habe.
=SUMMEWENN('[KUME.xlsm]DEFG'!$P$7:$P$48;LINKS(A2;LÄNGE(A2)-3);'[KUME.xlsm]DEFG'!$AO$7:$AO$48)
Nun habe ich das Argument 1 mit r_KUME1 und das Argument r_KUME3 als VBA-Range und den Spaltenzielbereich mit r_Ziel defniert (Set r_KUME1 = .....).
Wie muss ich nun die Range-Variablen r_KUME1 und r_KUME3 im Code übergeben, damit die Bereiche richtig adressiert werden?
With rZiel
.FormulaR1C1 = "=SUMIF(r_KUME1,LEFT(RC[-3],LEN(RC[-3])-3),r_KUME3)"
.Value = .Value
End With
Gruss, Peter