Hallo zusammen,
ich bin neu hier doch kenne ich dieses Forum bereits.
Meine Kenntnisse in VBA sind geringfügig doch konnte ich bisher alles lösen (teilweise mit einer Lösungshilfe aus diesem und anderen Foren). Nun bin ich aber bei einer Herausforderung, an der ich nicht weiter komme.
Ich habe eine Tabelle mit Werten in den Spalten A, B und C. In Zelle (1,1) steht ein Wert. Dieser soll mit dem Wert der Zelle (1,2) vergleichen werden. Ist der Wert der Zelle (1,1) ungleich dem Wert der Zelle (1,2), dann soll das Makro beginnend aber der nachfolgenden Zeile (im Beispiel ab (2,1)) alle Zellen in Spalte A bis zur letzten genutzten Zelle durchsuchen. Ist ein Wert gleich dem Wert (1,1) soll der Wert aus der Zelle (1,3) mit dem Wert des aus der gefundenen Zelle in Spalte 3 addiert werden. Ich zeige dies einmal in einem Beispiel. Ist kompliziert zu erklären.
A B C
1 2 10
2 2 20
2 3 30
3 3 40
1 3 50
4 6 60
5 5 70
1 1 80
Zeile A1 B1
Suchen nach einem Wert gleich A1
A5 = A1 und A5 B5
A8 = A1 aber A8 nicht ungleich B8
addiere nun C1 mit C5 und gib diesen Wert in D1 aus
Nun gehe in Zeile A2 und vegleiche diesen Wert mit B2
Sollte ein Wert bisher vorgekommen sein, soll er diesen überspringen. Wenn die Schleife durchläuft und bei A5 angekommen ist, dann soll er diese Überspringen, da die Zahl 1 bzw. der Wert bereits genutzt wurde.
Wäre der Wert A1 = B1, dann soll er diese Zeile überspringen und die nächste Zeile prüfen.
Im Grunde soll er ähnlich der Summewenn Formel alle Werte zusammenrechnen, die eine Bedingung erfüllen.
Für Hilfe wäre ich sehr dankbar.