Einfügen
09.08.2002 10:24:54
martin
es ist so weit, meine userform mit allen textboxen, label's und schaltflächen ist fertig. wenn ich eingaben in der userform mache werden die daten auch in das tabellenblatt übernommen zeile D8:O8. ein beispiel habe angehangen.
jetzt meine frage:
wenn ich auf die schaltfläche speichen clicke, soll der datensatz in die nächste freie zeile eingefügt werden, z.b. in der zeile D8:O8 steht ein eintrag, soll der nächste in zeile D9:O9 eingetragen werden usw. bis (65536).
zu info:
gleichzeitig möchte ich auch auch über die schaltflächen, "vorheriger datensatz" und "nächster datensatz" einen datensatz wieder anschauen oder ändern können. vielleicht muß man das ja berücksichtigen?
ich hoffe das ich das problem richtig geschildert habe, so das ihr mir helfen könnt.
im vorraus danke
martin
ps:
Private Sub TextBox1_Change()
Worksheets("Datenblatt-Damen-Einzel").Range("D8") = TextBox1
End Sub
Private Sub UserForm_Initialize()
Label7.Caption = Worksheets("Hauptübersicht").Range("E5").Value
Label11.Caption = Worksheets("Hauptübersicht").Range("E6").Value
TextBox1 = Range("D8")
TextBox2 = Range("E8")
TextBox3 = Range("F8")
TextBox4 = Range("G8")
TextBox5 = Range("I8")
TextBox6 = Range("K8")
TextBox7 = Range("H8")
TextBox8 = Range("J8")
TextBox9 = Range("L8")
End Sub