|
Hallo,
in VBA bin ich Anfänger. Ich soll ein kleines Programm schreiben. Es gibt 2 Tabellenblätter Auswertung und Material. In Material stehen ca. 5000 Mat.Nr. in Spalte A und in B die dazughörige Menge die auf Lager liegt.
In Auswertung müsste ich nun über alle Materialnr. (aus Tabellenblatt B) laufen und wenn diese mit den paar (die in Auswertung eingegeben werden) übereinstimmen, wird die Menge die auf Lager liegt hochgezählt.
Bsp. Ich geben in Auswertung 25 Mat.Nr. ein, dann soll das Programm jede dieser Nummern mit den im Tabellenblatt Material hinterlegeten Nummern vergleichen. Wenn eine Übereinstimmung gefunden wurde, wird die Menge die auf Lager ist in die Variable gesamtLagerBestand hinzugezählt.
Ich weiss dass ich da mit einer For-Schleife nur für jedes Mat. darüberlaufen muss und wenn ich eine übereinstimmung finde, muss ich hochzählen. Es geht mehr um die Syntax, wie ich die Daten aus dem anderen Tabellenblatt verwenden kann
1 2 3 4 5 6 7 8 9 10 | For i=0 to Material.Cells(Rows.count, 1).End(xlUp).Row
.
.
.
// Wenn Übereinstimmung gefunden
gesamtLagerBestand =gesamtLagerBestand+ Material.Cells.(i,2).Value
.
.
.
|
Vielen Dank :)
|