Kontakt- E-Mail- Adresse:klste@hotmail.de

 

Lagerprogramm 50.000 Artikel und 50.000 Lagerplätzen in Excel VBA selber erstellen

 

Excel VBA. Lagerprogramm 50.000 Artikel und 50.000 Lagerplätzen mit Filter Ansicht im Listenfeld

Mit dem Programm kann man Lager mit 50.000 Artikeln und 50.000 Lagerplätzen verwalten.

Die Excel Datei hat 4 Tabellenblätter: „Maske“, „Artikel“, „Entnahmeschein“ und „Blatt“.

In dem Programm alles wird aus einer Eingabemaske erledigt. Die Eingabemaske wird im Tabellenblatt „Maske“ mit Schaltfläche „Maske“ aktiviert.

Tabellenblatt „Artikel“ besteht aus 10 Spaten: Art.-Nr., Bezeichnung, Einheit, Bestand, Gesamtwert, Durchschnittliches Preis, Lagerplätze, Art.-Nr., Bezeichnung, Artikelbestand. Drei erste Spalten und Spalte „G“ (Art.-Nr., Bezeichnung, Einheit und Lagerplätze) werden direkt in dem Tabellenblatt per Hand eingetragen und die restlichen 7 Spaten werden vom Programm ausgefüllt. Der Tabellenblatt ist gesperrt und mit Kennwort geschützt (Kennwort ist die Zahl 3). Wenn der entsperrt werden soll, in der Menüleiste „Überprüfen“ „Blattschutz aufheben“ auswählen, in erscheinender Eingabebox Kennwort die Zahl 3 eintragen und OK anklicken.

Im Tabellenblatt „Entnahmeschein“ steht immer zuletzt ausgewählter Entnahmeschein.

Im Tabellenblatt „Blatt“ stehen Kopien vom Grundbuch, von Lagerplätzen, von Liste aller Entnahmescheine.

Eingabemaske besteht aus zwei Rahmen: „Zugang/Bezugskosten“, „Entnahmeschein“, und aus fünf Schaltflächen: „Eintrag loeschen“, „Liste loeschen“, „Grundbuch loeschen“, „Artikelbestand loeschen“, „Blatt“ und aus sechs Checkboxen: „Artikel“, „Grundbuch“,“ Entnahmeschein“, „Liste“, „Lagerplatz“, „Blatt“ und aus einem Listenfeld.

Rahmen „Zugang/Bezugskosten“ ist für Zugänge, Bezugskosten und Gutschrift/Nachlässe. Jeder Buchungssatz bekommt eigene ID-Nr. Programm erstellt 1048500 Buchungssätze. Alle ID-Nr. stehen im Feld „ID-Nr.“ Mit leerem Feld, kann man neuer Buchungssatz bilden und eintragen, mit ausgefülltem Feld, wird der ausgewählte Buchungssatz in unteren Feldern angezeigt. Wenn im Feld falsche ID-Nr. eingetragen wird, werden alle unteren Felder geleert. Datum aus Feld „Datum“ wird in Buchungssatz eingetragen, wenn Feld leer ist, wird aktuelles Datum eingetragen. Feld „Geschäftsfall“ bestimmt die Art vom Buchungssatz: Beim Zugang - wird Menge und Betrag eingetragen, bei Bezugskosten - wird nur Betrag eigetragen, bei Gutschrift/Nachlässe - wird Betrag abgezogen. In Feldern „Artikel-Nr.“ und „Bezeichnung“ stehen die Inhalte der Spalten „A“ und „B“ aus dem Tabellenblatt „Artikel“. Zwei weitere gelbe Labels zeigen Einheit und Preis vom ausgewählten Artikel. Inhalt der Felder „Menge“ und „Betrag“ wird als Zahl im Eintrag verbucht, die leere Inhalte werden als Null verbucht. Im Feld „Lagerplatz“ steht Inhalt der Spalte „G“ aus dem Tabellenblatt „Artikel“. Belege werden im Feld „Beleg“ eingetragen. Wenn ID-Nr. Feld leer ist, ist Schaltfläche „Eintragen“ sichtbar, und man kann neuer Buchungssatz eintragen.

Die Entnahmescheine werden im Rahmen „Entnahmeschein“ erstellt. Alle Nummern von Entnahmescheinen stehen im Feld „Entnahmeschein -Nr.“. Neuer Entnahmeschein wird erstellt, wenn das Feld leer ist und wird bearbeitet, wenn Entnahmescheinnummer in dem Feld steht. Im Feld „Position“ stehen alle Positionsnummer vom ausgewählten Entnahmeschein. Neuer Position wird erstellt, wenn Feld „Position“ leer ist. Programm erstellt nur 20 Positionen in einem Entnahmeschein. Die gelben Felder für Artikelnummer funktionieren genauso wie solche Felder im Rahmen „Zugang/Bezugskosten“. Das Feld „Menge“ funktioniert genauso wie solches Feld im Rahmen „Zugang/Bezugskosten“. Feld „Betrag“ ist ein Label, da steht dass, was Programm ausgerechnet hat. Das Feld „Lagerplatz“ funktioniert genauso wie solches Feld im Rahmen „Zugang/Bezugskosten“. Wenn „Position“ Feld leer ist, ist Schaltfläche „Eintragen“ sichtbar, und man kann neue Position erstellen. Schaltfläche „Entnahmeschein“ aktiviert Tabellenblatt „Entnahmeschein“ und schaltet die Eingabemaske aus.

Listenfeld kann unterschiedliche Hintergrundfarben haben. Gelb für Artikelnummer, weiß für Grundbuch, grün für Entnahmeschein, braun für Liste und grau für Lagerplatz. Wenn Checkbox „Blatt“ nicht aktiv ist, kann man im Listenfeld mit einem Doppelklick ausgewählte ID-Nr. in „ID-Nr.“ Feld übertragen, ausgewähltes Entnahmeschein in „Entnahmeschein -Nr.“ Feld übertragen, ausgewählte Artikelnummer in „Artikel-Nr.“ Felder übertragen, ausgewählter Lagerplatz in „Lagerplatz “Felder übertragen. Im Listenfeld die Spaltenbreiten passen sich automatisch an, an Spaltenbreiten des gezeigten Tabellenblattes, (wenn Listenfeld braun ist, funktioniert das nicht).

Schaltfläche „Blatt“ wird nur dann sichtbar, wenn Listenfeld Grundbuch, Liste oder Lagerplatz zeigt. Die Schaltfläche aktiviert Tabellenblatt „Blatt“, erstell in dem Blatt eine Kopie von dem im Listenfeld angezeigten Tabellenblatt und schaltet die Eingabemaske aus. Im Tabellenblatt „Blatt“ kann man Filter einsetzen, Zelle A1 anklicken, in Menüleiste Start, Sortieren und Filter, Filter auswählen.

Checkbox „Blatt“ aktiviert Filteransicht im Listenfeld. Wenn Grundbuch gefiltert wird, stehen im Feld „ID-Nr.“ nur gefilterte ID-Nummern, wenn Liste gefiltert wird, stehen im Feld „Entnahmeschein -Nr.“ nur gefilterte Entnahmescheinnummer.

Checkbox „Lagerplatz“ zeigt im Listenfeld alle Lagerplätze.

Checkbox „Liste“ zeigt im Listenfeld Liste aller Entnahmescheinen.

Checkbox „Entnahmeschein“ zeigt im Listenfeld ausgewählter Entnahmeschein.

Checkbox „Grundbuch“ zeigt im Listenfeld das Grundbuch.

Checkbox „Artikel“ zeigt im Listenfeld alle Artikel.

Schaltfläche „Eintrag loeschen“ löscht ausgewählter Buchungssatz. Kennwort ist die Zahl 3.

Schaltfläche „Liste loeschen“ löscht alle Entnahmescheine. Kennwort ist die Zahl 3.

Schaltfläche „Grundbuch loeschen“ löscht Inhalte des Grundbuchs. Kennwort ist die Zahl 3.

Schaltfläche „Artikelbestand loeschen“ löscht im Tabellenblatt „Artikel“ Inhalte von Spalten: D, E, F, H, I, J. Kennwort ist die Zahl 3.