Serienformular aus Tabelle befüllen

Tobi_GL · 2024-09-05T11:56:21+00:00

Hallo zusammen, ich möchte gern ein bestehendes Formular zur Abnahme von Fertigungsleistungen aus einer Tabelle mit diversen Daten füllen, diese Daten durch Schriftfarbe oder Schriftart vom eigentlichen Formular abheben und dann jeweils abspeichern/ausdrucken. So hab ich mir das gedacht: Aus dem Sheet "Daten zum Ausfüllen" der angehangenen Datei sollen Daten in dem Sheet "Formblatt" eingefügt werden. Daten zum Ausfüllen -> Formblatt $A$4 E3 $B$4 B2 C5....C139 C4 D5...D139 F4 E5...D139 C5 F5...F139 F5 Wäre toll, wenn mir jemand helfen könnte, bin leider ziemlich Logik-Blind und Excel für mich immer noch ein technisches Wunderwerk :-) https://www.herber.de/bbs/user/172008.xlsx Danke vorab!

Hallo Thorsten,

danke für Deine Antwort! Und gut, daß Du nochmal nachgefragt hast, ich nämlich noch was vergessen:
Im Formular soll die Zelle B3 mit $Q$4 aus den "Daten" befüllt werden.
Ja ich denke, Du hast mich richtig verstanden. In den einzelnen Formularen bleiben die Zellen B2, B3 und E4 (je nach Projekt) immer gleich. Die Zellen C4, C5, F4 und F5 sollen fortlaufend gemäß der Zeilen 5-139 gefüllt werden, wie unten dargestellt. Am Ende habe ich dann 134 separate Formulare, die ich für jede Fertigungsleistung ablegen kann. Ein automatisches Ausdrucken ist nicht nötig, das kann ich auch händisch bewerkstelligen. Ich vermute mal, das ich hier einen VBA-Code brauche. Gibt da eine Möglichkeit, für so eine Gesamtaktion, also einmalig für hier 134 neue Dateien, einen Speicherort direkt im Code zuzuweisen?

dann hier meine VBA-Lösung:

https://www.herber.de/bbs/user/172021.xlsm

Beschreibung:
1. Speicher die Datei in einem beliebigen Verzeichnis, z Bsp in D:\Beispiel

2. Öffne die Datei

3. Wechsel auf das Blatt "Daten zum Ausfüllen", auf dem ich einen Command-Button hinzugefügt habe

4. Klick auf den Button

4a. Wenn es noch nicht existiert, wird im Ordner D:\Beispiel ein Unterordner mit dem Namen des Projektes aus Zelle B4 erstellt.
Der Zielordner aller Dateien heißt dann D:\Beispiel\AliPre 4Kt Ultra

4b. Es wird eine For/Next-Schleife gestartet, die in Zeile 5 beginnt und in der letzten Zeile in Spalte C endet.

4c. Als erstes wird eine neue Excel-DATEI erstellt

4d. In der Datei mit dem Button wird das Blatt "Formblatt" kopiert und in die neue Datei ganz am Ende eingefügt

4e. Das erste Blatt in der neuen Datei wird gelöscht

4f. Nun werden alle gewünschten Werte aus dem Blatt "Daten zum Ausfüllen" kopiert und in der neuen Datei in die richtigen Zellen eingefügt

4g. Alle zuvor eingefügten Daten in der neuen Datei erhalten, wie gewünscht (Zitat: "diese Daten durch Schriftfarbe oder Schriftart vom eigentlichen Formular abheben")...
- die gleiche Schriftart Arial
- die gleiche Schriftgröße 11
- alle Werte werden nicht fett dargestellt
- alle Werte werden nicht kursiv dargestellt
- die Schrift wird in rot angezeigt

4h. Die erste Datei wird im Verzeichnis D:\Beispiel\AliPre 4Kt Ultra\ unter dem Namen AliPre 4Kt Ultra_1.xlsx gespeichert
- die neue Datei wird geschlossen
- alle Schritte ab 4b werden wiederholt
- die zweite Datei wird im Verzeichnis D:\Beispiel\AliPre 4Kt Ultra\ unter dem Namen AliPre 4Kt Ultra_2.xlsx gespeichert
- die neue Datei wird geschlossen
- alle Schritte ab 4b werden wiederholt
- die dritte Datei wird im Verzeichnis D:\Beispiel\AliPre 4Kt Ultra\ unter dem Namen AliPre 4Kt Ultra_3.xlsx gespeichert
...usw

Hilfts?

Ciao
Thorsten

Serienformular aus Tabelle befüllen

Forumthread: Serienformular aus Tabelle befüllen

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Serienformular aus Tabelle befüllen

Forumthread: Serienformular aus Tabelle befüllen

13 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread