Daten aus UserForm in bestimmte Zellen schreiben

Computer: Software & Programmierung Office Software
#1

Ich habe eine UserForm mit 20 Text-Boxen. Hier werden verschiedene Daten eingetragen. Wichtig sind hier zwei: 1.Box Raum-Name, 2.lfd.Nr. die restlichen 18 Boxen haben Einträge die sich auf Box 1 und 2 beziehen. Ich möchte jetzt über ein CommandButton (cmdEingabeSpeichern) diese Daten in eine Tabelle schreiben.
In Zeile 1 sind die Spalten-Beschriftungen (A: Raum-Name, B: lfd.Nr., 3.-20. Daten. Nun möchte ich das nach Betätigung des Button „cmdEingabeSpeichern“ die Daten in die erste freie Zeile geschrieben werden, wobei als Hauptspalte der Raum-Name fungiert. Es können also mehrere Einträge unter dem gleichen Raum-Namen eingetragen werden, aber duch lfd.Nr. unterschieden. Die anderen Daten richten sich dann nach Raum-Name und dann nach lfd.Nr.
Wie kann da der Code für das CommundButton aussehen?
Wer kann helfen?

Gruß Ole

#2

Hallo Ole,

In Zeile 1 sind die Spalten-Beschriftungen (A: Raum-Name, B:
lfd.Nr., 3.-20. Daten. Nun möchte ich das nach Betätigung des
Button „cmdEingabeSpeichern“ die Daten in die erste freie
Zeile geschrieben werden, wobei als Hauptspalte der Raum-Name
fungiert.

die letzte besetzte Zelle in A kann man so ermitteln:
Letzte=Cells(Rows.Count,„A“).End(xlup).Row

Das bedeutet dann sowas:
Cells(Letzte +1,„A“).Value = TextBox1.Text
(ungetestet, kann auch TextBox1.Value sein)

Es können also mehrere Einträge unter dem gleichen
Raum-Namen eingetragen werden, aber duch lfd.Nr.
unterschieden. Die anderen Daten richten sich dann nach
Raum-Name und dann nach lfd.Nr.

*hmmh* Vielleicht haben das viele verstanden, ich aber noch nicht so. Kannst du Beispielmappe hochladen?

Gruß
Reinhard

#3

Hallo Reinhard,

danke für den Hinweis,
habe den Code dementsprechend geändert. Klappt jetzt alles wunderbar.

Danke nochmal
Ole