Makro um Daten wiederzugeben wenn Beding

Ein Hallo an alle Excelspezis!
Bis jetzt konnte ich mir immer selbst helfen, sei es mit Google oder anderen Mitteln weiterhelfen.
Jetzt bin ich aber an meine Grenzen gestoßen und bin halbwegs am verzweifeln.
Ich lade euch zusätzlich eine Mappe mit hoch wo ein Ausschnitt der Excel ist die ich bearbeite.
Das Ziel soll folgendes sein (in Einzelschritten aufgeführt):
1. Aus Tabelle 1 soll die Artikelnummer genommen werden und Tabelle "Auslieferung" gesucht werden (Excel ist ca. 3000 Zeilen lang, sowohl Tabelle 1 wie "Auslieferung")
2. Er soll aus Tabelle 1 den Lagerbestand aus Lager 1 nehmen und mit dem ersten Auftrag subtrahieren. Wenn der Wert Positiv ist soll er Auftrag 1 + 2 addieren und wenn der Wert wieder Positiv ist das gleiche mit den nächsten Auftrag, usw. bis der Wert negativ ist. Da wo der Wert Negativ geworden ist (bei der Excel wäre das, dass Datum 12.07), soll er das entsprechende Datum in Tabelle 1 in Spalte Q wiedergeben.
Ich hoffe es war einigermaßen Verständlich.
Link zur Excel:
https://www.herber.de/bbs/user/146527.xlsx

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Sub Datum_Benoetigt() Dim Datum As Range Dim t As Long ' Suchbereich 'Suchbegriff Set Datum = Tabelle4.Columns(1).Find(what:=Tabelle1.Range("a2:a2000").Value, _ lookat:=xlWhole) If Datum Is Nothing Then MsgBox "Leider nichts gefunden" Else Tabelle1.Range("p2:p2000").Value = Tabelle4.Cells(Datum.Row, 2).Value End If End Sub

Hi
schau dir das mal an.
ist mit ein paar Hilfsspalten in Tabelle 2, aber dadurch vielleicht leichter verständlich und anzupassen.
Formeln müssen für größere Datenmengen nicht angepasst werden. Rechenzeit kann bei größeren Datenmengen ein Problem werden.
https://www.herber.de/bbs/user/146539.xlsx
die frage ist, warum in der zweiten Datei die Artikelliste in der Tabelle 1 nicht mehr eindeutig ist und mehrere Lager und eine Gesamtzeile vorkommen.
Das war in der ersten Beispieldatei nicht so.
Beachte bitte zukünftig, dass solche Sachen einen großen Einfluss auf die Formeln haben können, insbesondere die Eindeutigkeit von ID-Begriffen in einer Liste, oder "artfremde" Zwischenzeilen wie die Gesamtsumme.
sowas "passt" nicht in eine Tabelle und macht die Auswertung u.U. komplizierter, daher sowas immer bitte gleich mit angeben.
Vereinfachte Problemstellungen führen meist auch zu einfachen Lösungen, die dann nicht zum komplexen Problem passen und dann zu doppel-Arbeit führen, weil das Problem dann anders gelöst werden muss als in der vereinfachten Aufgabenstellung.
Wenn du für jeden Lösungsansatz bezahlen würdest, wäre das natürlich kein Problem, aber da du hier ja kostenfrei Hilfe erwartest, solltest du sowas vermeiden.
Gruß Daniel
Gruß Daniel

Beliebteste Forumthreads (12 Monate)

Makro um Daten wiederzugeben wenn Beding

17 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

17
Beiträge zum Forumthread

Beiträge zu diesem Forumthread