Einträge ändern
27.11.2003 12:05:18
michael
Ich möchte etwas in den einzelnen Textboxen ändern und in die gleiche Zelle zurückschreiben. Egal was ich anstelle, es will einfach nicht funktionieren.Ich steh total an. Vielleicht kann mir wieder irgendwer helfen?
Private Sub FamiliennameCbo_Change()
TextBox3 = Cells(FamiliennameCbo.ListIndex + 1, 3)
TextBox4 = Cells(FamiliennameCbo.ListIndex + 1, 4)
TextBox5 = Cells(FamiliennameCbo.ListIndex + 1, 5)
TextBox6 = Cells(FamiliennameCbo.ListIndex + 1, 6)
End Sub
Gruss
Michael