14.05.2020, 12:18 (Dieser Beitrag wurde zuletzt bearbeitet: 14.05.2020, 12:18 von zahfu.)
Hallo zusammen,
ich stehe vor folgendem Problem:
In verschiedenen Produkten werden verschiedene Komponenten verbaut. Teilweise werden in unterschiedlichen Produkten auch gleiche Komponenten verbaut. Hier möchte ich nun auswerten, welches Produkt mit welchem anderen Produkt wie viele gleiche Komponenten hat und dies in einer Matrix darstellen (wie im angefügten Bild mal manuell dargestellt und ausgezählt, bei größeren Datenmengen natürlich nicht mehr realisierbar; d.h. aber z.B. im Produkt 152687 und 548321 wird hier im Beispiel genau eine gleiche Komponente verbaut - hier A). Als Datenbasis liegt eine Tabelle wie unten im Bild vor, d.h. über alle möglichen Produkt-Komponenten-Kombinationen.
Ich habe mich bereits per Pivot-Tabelle an einer solchen Auswertung versucht, da komme ich aber leider nicht weiter.
Ich wäre um jegliche Lösungsidee für das Problem dankbar.
Formel mit strg+shift+enter abschließen. =WENN($A4=B$3;"";SUMMENPRODUKT(1*(WENN(($B$13:$B$28=$A4);$A$13:$A$28;"n")=MTRANS(WENN($B$13:$B$28=B$3;$A$13:$A$28)))))
ja super. Von der Funktion/Vorgehensweise habe ich die Idee verstanden, Danke dafür!
Allerdings habe ich, sobald ich das auf eine größere Datenmenge (die Liste mit den Komponenten-Produkt Zuordnungen ist ca. 35.000 Zeilen lang, Duplikate bereits entfernt) anwenden möchte, folgendes Problem: "Für Excel waren beim Berechnen einer oder mehrerer Formeln nicht genügend Ressourcen vorhanden. Daher können diese Formeln nicht ausgewertet werden."
Gibt es eine Lösungsmöglichkeit dafür oder wird der Rechner das für die Praxisanwendung in dem Umfang nicht abbilden können? Es ist bereits nur Excel geöffnet, d.h. keine weiteren Programme im Hintergrund...
Für das Problem sehe ich zumindest für meine Excel Version keine vernünftige Formellösung. Ich kann dir da nur eine VBA Lösung anbieten. Wäre das für dich eine Option?
In neueren Excels gibt es wohl so was wie Filter() und Eindeutig(). Damit geht evtl. was. Aber da kann ich nicht helfen.
Ich gehe mal davon aus das die Anzahl der Produkte welche die Komp. enthalten nicht so hoch ist.
Zitat:Nur, mein Excel ist nur 16000 Spalten breit. Diese Matrix darzustellen wird sich wohl nicht ausgehen.
genau, die Anzahl der Produkte ist überschaubar, liegt ca. bei 40. Die Matrix als solche ist also 40x40 zuzüglich der Beschriftungszeile/-Spalte. Lang ist die Liste mit den Zuordnungen, also quasi die Datenquelle bzw. Ausgangsdaten...
Grundsätzlich bin ich auch von einer VBA Lösung nicht abgeneigt. Allerdings habe ich hier bislang noch nicht so viel Erfahrung (habe wenn bislang mit „Makro aufzeichnen“ gearbeitet, um bestimmte wiederkehrende Vorgänge dann zu automatisieren und wiederholt auf Knopfdruck durchführen zu können) - lerne aber gerne dazu und erweitere da mein Wissen. Ich hoffe also, dass ich das dann auch entsprechend verstehe und anwenden/übertragen kann.
If Wert1 = Wert2 Then Kombi = "" Else z = WorksheetFunction.CountIf(rngDaten.Columns(2), Wert1) s = WorksheetFunction.CountIf(rngDaten.Columns(2), Wert2) If z = 0 Or s = 0 Then Kombi = 0 Else ReDim ArrA(1 To z) ReDim ArrB(1 To s) For A = 1 To rngDaten.Rows.Count If Wert1 = Daten(A, 2) Then j = j + 1 ArrA(j) = Daten(A, 1) End If If Wert2 = Daten(A, 2) Then jj = jj + 1 ArrB(jj) = Daten(A, 1) End If Next A
A = 0 For j = 1 To z For jj = 1 To s If ArrA(j) = ArrB(jj) Then A = A + 1 Next jj Next j Kombi = A End If End If
End Function
In B4 die Formel und dann nach rechts und unten ziehen. =Kombi(ZEILE();SPALTE())
vielen Dank. Konnte es in der Beispiel-Datei anwenden und umsetzen und dann auch in die eigentliche Datei übertragen und anpassen. Funktioniert einwandfrei, so wie es soll. So einen Lösungsweg habe ich gesucht, wäre ich von allein nie drauf gekommen. Richtig gut, danke dir!!
