Hallo Thomas,

das könnte man z.B. mit dem nachfolgenden Code realisieren.

Kopiere das Makro in das VBA-Projket des Tabellenblattes, in dem Du Deine Daten eingibst.
Teste das Makro aber bitte in einer Testdatei und nicht gleich in Deiner Originaldatei.

[b]Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Select Case Target.Cells
'Wenn Menge bis 5 Stück, dann in gleicher Zeile wie Eingabe _
 in einer Spalte rechts daneben den Wert 1 eintragen
Case Is <= 5
Target.Cells.Offset(0, 1) = 1
'Wenn Menge bis 10 Stück, dann in gleicher Zeile wie Eingabe _
 in einer Spalte rechts daneben den Wert 2 eintragen
Case Is <= 10
Target.Cells.Offset(0, 1) = 2
'Wenn Menge bis 15 Stück, dann in gleicher Zeile wie Eingabe _
 in einer Spalte rechts daneben den Wert 3 eintragen
Case Is <= 15
Target.Cells.Offset(0, 1) = 3
'Wenn Menge bis 20 Stück, dann in gleicher Zeile wie Eingabe _
 in einer Spalte rechts daneben den Wert 40 eintragen
Case Is <= 20
Target.Cells.Offset(0, 1) = 4
End Select
End If
End Sub[/b]

Bei dem Code wird davon ausgegangen, dass die Artikelanzahl in Spalte A eingetragen wird un eine Spalte rechts daneben der Wert für die Verpackun´gseinheiten erscheinen soll. Wird in Spalte A ein Wert kleiner / gleich 5 eingetragen, erscheint eine Spalte rechts daneben der Wert 1. Wird dort ein Wert kleiner / gleich 10 eingetragen, erscheint eine 2 usw.
Soll die Eingabe nicht in Spalte A sein, so muss in dem Code in Zeile

[b]If Target.Column = 1 Then[/b]

die Spaltenindexzahl 1, die für Spalte A steht, gegen eine andere Indexzahl getauscht werden. Für Spalte B wäre es die 2, für Spalte C die 3 usw.
Soll nicht eine Spalte rechts neben der EIngabe der Wert für die Verpackungseinheiten erscheinen, sondern 2 Spalte weiter rechts neben der Eingabe, so muss in den Zeilen, in denen die Eigenschaft ".Offset" vorkommt, die Zahl 1, die in der Klammer steht, gegen eine 2 getauscht werden. Bei 3 Spalten weiter rechts wäre es die Zahl 3 usw.

Ich hoffe, Du kommst klar.

Solltest Du nicht wissen, wie Du den Code in Deine Datei bekommst, dann schau mal auf meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 2 nach. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.

Bei Fragen melde Dich.

MfG,
Oliver
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du}
^{ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Hi & mahlzeit!

eine frage kettcar04: Wozu? hast du da nicht einen denkfehler? Es kann doch eigentlich nicht die selbe Artikelnummer vergeben werden, wenn die VE eine andere ist, auch, wenn der eigentliche Artikel in der VE der selbe ist!! Wie machst du da eine Inventur?

kromgi

PS.: nur so´n gedanke!

Hallo,

also erstmal vielen Dank, Oliver. Grundsätzlich funktioniert das erstmal bei mir. jetzt muss ich aber mal gucken, ob und wie ich das ganze in meine etwas umfangreichere Tabelle einfügen kann.

@kromgi
es ist ganz einfach so, dass ich den Artikel A von unserem Lieferanten nur als VE bekomme, der aber viel zu groß zum verkaufen wäre. Also wird er zu Artikel B abgepackt. Bei einer Bestellung muss ich aber Artikel B mitbestellen und da ich nicht für jeden Artikel die abgepackte Menge im Kopf habe, will ich mir die Bestellung mit der og. Funktion etwas erleichtern.

ciao Thomas

Guten Morgen!
@kettcar04
Ich kenne ja deine internen gegebenheiten nicht, aber so wie ich das sehe, hast du ---so, wie du das grob beschreibst--- mit dieser art mehrere probleme gleichzeitig:
-Eine bestandsführung ist eigentlich nicht möglich.
-daraus resultierend entsteht entweder eine über- oder auch unterdeckung der artikel, heißt: es gibt artikel, die zuviel im lager sind und gleichzeitig gibt es artikel die ständig fehlen.
-daraus wiederum resultierend sind verschenke umsätze und gleichzeitig zu hohe verbindlichkeiten, die liquidität könnte unter umständen beeinträchtigt werden,
-die lagerkennzahlen verschieben sich ins negative, dein ertrag dadurch auch.

ein betrieb erzielt einen nicht unwesentlichen teil des ertrags bei optimierter bestandshaltung!

dein problem könnte man sicherlich eleganter gestalten, und vor allem den arbeitsaufwand minimieren!

kromgi

PS: aber wie schon geschrieben: ich kenne die äußeren umstände des betriebes nicht!