Microsoft Excel

Herbers Excel/VBA-Archiv

automatische Listenerzeugung aus Formular

Betrifft: automatische Listenerzeugung aus Formular von: Nico
Geschrieben am: 13.10.2014 10:30:10

Hallo!

Ich möchte eine einfache "Datenbank" erstellen und benötige Eure Hilfe:

Ich möchte in einem Tabellenblatt A in einem "Formular" (nicht in Textfeldern, sondern in Zellen) Informationen erfassen und diese per Knopfdruck in einem zweiten Tabellenblatt B hintereinander weg in eine Zeile übertragen.

Sobald die Daten in das Tabellenblatt B übertragen wurden, sollen die Inhalte des Tabellenblatts A wieder gelöscht werden.

Werden dann in Blatt A neue Informationen erfasst, sollen diese in die nächste freie Zeile in Blatt B übertragen werden.

Es wäre super, wenn ihr mir bei der Programmierung des Makros helfen könntet (speziell der Übertrag der Infos in die nächste freie Zeile ist ein Problem für mich).

Vielen Dank schonmal für Eure Hilfe!

Beste Grüße,
Nico

  

Betrifft: AW: automatische Listenerzeugung aus Formular von: Steffi
Geschrieben am: 13.10.2014 11:34:20

Hallo Nico,

hier wäre mal ein einfacher Ansatz.

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

Hast du dir das in etwa so vorgestellt?


Gruß Steffi


  

Betrifft: AW: automatische Listenerzeugung aus Formular von: Nico
Geschrieben am: 13.10.2014 11:39:06

Hi Steffi!

Vielen Dank - das ist schon super. Gibt es auch die Möglichkeit, dass die Zellen im Formular nicht zusammenhängend sind, sondern in unterschiedlichen Zeilen bzw. Spalten?

Danke & Grüße,
Nico


  

Betrifft: AW: automatische Listenerzeugung aus Formular von: Steffi
Geschrieben am: 13.10.2014 11:45:05

Klar geht das. Einfach diese Zeile

 .Range(.Cells(ltzZ, 1), .Cells(ltzZ, 5)).Value = ThisWorkbook.Sheets(1).Range("A2:E2").Value
ersetzen. Bspw. so:
.Cells(ltzZ, 1).Value = ThisWorkbook.Sheets(1).Cells(2, 1).Value
.Cells(ltzZ, 2).Value = ThisWorkbook.Sheets(1).Cells(3, 2).Value
.Cells(ltzZ, 3).Value = ThisWorkbook.Sheets(1).Cells(4, 3).Value
und so weiter.



Gruß Steffi


  

Betrifft: AW: automatische Listenerzeugung aus Formular von: Nico
Geschrieben am: 13.10.2014 11:50:32

Sensationell! Vielen lieben Dank Steffi!

Grüße,
Nico


 

Beiträge aus den Excel-Beispielen zum Thema "automatische Listenerzeugung aus Formular"