Beispieldatei:
https://www.herber.de/bbs/user/162479.xlsm

Sehr geehrte Excel und VBA Profis,

Zu mir:
Ich bin Gründer eines Kleinunternehmens (Verleih von Candybars) mit geringem Umsatz (2k pa.), weshalb ich keinen Excelprofi engagieren kann.
Ich habe eine Excel und VBA Passion, jedoch sehr geringe Kenntnisse, weshalb ich auf Hilfe hoffe.

Zur Ausgangslage:
Ich möchte dem Kunden die Möglichkeit geben Süßwaren zu bestellen. Aufgrund meiner Excelpassion allerdings nicht auf einen bloßen Zettel zum ausdrucken und händischen Ankreuzen, sondern über eine elegante Exceldatei.
Hierzu habe ich verschiedene Worksheets angelegt:
- TB1 = Start: Begrüßung, Erklärung, Listenauswahl zu den anderen Sheets, Buttons (Alles zurücksetzen (fertig), Standardempfehlung (in Arbeit aber problemlos), Fertig (hier liegt das Problem)
- TB2-5 = Listen mit verschiedenen Süßwaren (Weingummis, Lakritz, Schokolade und Salziges): Hier sind nur die roten Zellen "Menge" nicht gesperrt, sodass die Kunden die Menge der gewünschten Süßwaren auswählen können.
- TB6 = System: Hier soll eine Bestellliste entstehen, die sich mit Knopfdruck "Fertig" (TB1) automatisch zu einer übersichtlichen Liste befüllt, um diese (z.B. als PDF) ausdrucken zu können.

Zur Aufgabe:
Drückt man auf der Startseite (Tabellenblatt 1) den Button "Fertig - Als PDF drucken" soll auf dem Tabellenblatt 6 ("System") ab Zeile 14 eine Auflistung entstehen.
Spalte A soll eine laufende Nummer generieren, Spalte B bis G soll die Daten aus den Tabellenblättern 2 - 5 kopieren bzw. einfügen, bei denen die Menge größer als 0 ist.
Zuletzt soll unter der letzten Spalte eine Summe der Preise (Spalte G) summiert werden.

Bisherige Problemlösungen:
Recherchen in Excelbüchern, Youtube Anleitungen und dem Versuch den Beitrag in diesem Forum "VBA, Generieren einer Bestellliste und Word-Export" zu nutzen und den dortigen Code auf meine Datei anzuwenden führten nicht zur Problemlösung, da ich zu dumm bin bzw. hier über mehrere TBs hinweg kopiert werden soll.
Ich bin mittlerweile am verzweifeln, da ich es seit Tagen selbst versuche und schnell merkte, dass mir VBA Skills fehlen.


In der Hoffnung, dass jemand Spaß an dieser Aufgabenstellung hat, verbleibe ich mit freundlichen Grüßen und Dank im voraus.
Daniel.