Einstandspreisberechnung

[Victor]

Moin Zusammen,

ich habe ein recht kompliziertes Problem und komme einfach nicht mehr weiter:

Ich möchte einen Einstandspreis aus dem Warenzulauf und dem aktuellen Lagerbestand errechnen.

Dazu muss der Einkaufspreis je Artikel und parallel die Menge (beides variabel je Wareneingang) solange addiert werden, bis die Menge den aktuellen Lagerbestand erreicht.
Anschließend muss der Addierte Preis durch den Lagerbestand geteilt werden.

Es sind derzeit 140 Artikel. Die Berechnung soll monatlich erfolgen und kostet extrem viel Zeit.

Ein Beispiel:

Artikel 123456 Lagerbestand 67

Wareneingang Artikel    Menge Preis
Z354              123456     52     281,84 
Z359              123456     45     273,50

Nun soll theoretisch der Preis von Z354 mit und anteilig Z359 addiert und durch den Lagerbestand geteilt werden.

Die Datei kann ich leider nicht hochladen.

Die Mengen stehen in C2:C14000
Die Einkaufspreise in J2:J14000
Der Lagerbestand in Rechner!E5
Die Artikelnr in Rechner!B5

Könnt ihr mir dabei helfen?

[steve1da]

Hola,
lade eine Beispieldatei mit Phantasiedaten hoch.
In dieser Datei zeigst du händisch ein Wunschergebnis.
Ich persönlich kann mit solchen Erklärungen nichts anfangen:

Nun soll theoretisch der Preis von Z354 mit und anteilig Z359 addiert 

Theoretisch? Mit und? Anteil addiert?
Gruß,
steve1da

[{Boris}]

Hi,

das ist voraussichtlich eine schöne LAMBDA-Aufgabe - in Verbindung mit der SCAN-Nebenfunktion. Aber dafür würde ich auch gerne mal einen aussagekräftigen Tabellenausschnitt sehen wollen mit den EXAKTEN Zellkoordinaten.

[maninweb]

Hallo,

sofern die entsprechenden Funktionen in Excel vorhanden sind, anbei eine mögliche Lösung, die ich allerdings nicht ausführlich
getestet habe und sofern ich richtig verstanden habe, was Du möchtest. Und, kann sein, dass es einfacher geht.

Code:

=LET(Menge;$C$2:$C$20;Preise;$D$2:$D$20;Bestand;$H$1;
N;SCAN(Bestand;Menge;LAMBDA(A;V;A-V));
P;VERGLEICH(WAHR;N<=0;0);
M;MATRIXERSTELLEN(ZEILEN(Preise);1;LAMBDA(X;Y;WENN(X<>P;WENN(INDEX(N;X;1)>0;1;0);WENNFEHLER((INDEX(Menge;P;1)+INDEX(N;P;1))/INDEX(Menge;P;1);0))));
SUMME(M*Preise))

Gruß

[Sulprobil]

Hallo Victor,

anbei mein Lösungsvorschlag (ohne jegliche Gewährleistung, aber ich verwende einen aktuellen Virenscanner).

Viele Grüße,
Bernd

[Victor]

Moin Zusammen,

danke für eure Antworten.

Sulprobil danke für die Lösung des Problems. Wir mir scheint habe ich noch einiges zu lernen ;).

LG Victor

[{Boris}]

Hi Mourad,

sag ich doch - prädestiniert für eine "kleine" LAMBDA