Hallo Zusammen,
ich benötige wirklich sehr dringend Hilfe :/ Ich habe eine Excel Tabelle mit 4 Spalten. In der ersten steht nur das Datum und ist irrelevant.
In der nächsten (B) stehen MR-Nummern und in der darauf (C) LN-Nummern in der letzten (D) Stunden.
Nun möchte ich, dass Excel die MR-Nummern mit den LN-Nummern vergleicht und identische Paare die Stunden zusammenzählt.
Dies sollte wie folgt aussehen:
Datum MR-Nummer LN-NUmmer Stunden
2015 555 333 4
2015 555 232 9
2015 555 333 15
2015 555 232 6
Die MR-Nummer sowie die LN-Nummern und die Stunden sind Variiable!!! Das Ergebnis sollte dann so aussehn:
Datum MR-Nummer LN-NUmmer Stunden
2015 555 333 19
2015 555 232 5
Ich habe was aus dem Internet, dort wird aber nur spalte B zusammen gerechnet ://
Sub Test()
Dim wsQ As Worksheet
Dim wsZ As Worksheet
Dim sFormel As String
Set wsQ = Worksheets("Tabelle1")
Set wsZ = Worksheets("Tabelle2")
wsZ.UsedRange.ClearContents
wsQ.Range("A1").CurrentRegion.Copy Tabelle2.Cells(1)
wsZ.Range("A1").CurrentRegion.RemoveDuplicates Columns:=Array(1, 2, 3), Header:=xlYes
With wsZ.Range("A1").CurrentRegion
With .Resize(.Rows.Count - 1).Offset(1).Columns(2)
sFormel = "=SUMIFS(" & _
wsQ.Name & "!C," & _
wsQ.Name & "!C[-1],RC[-1]," & _
wsQ.Name & "!C[1],RC[1]," & _
wsQ.Name & "!C[2],RC[2])"
.FormulaR1C1 = sFormel
.Value = .Value
End With
End With
End Sub