Werte aus Textboxen in Exceltabelle schreiben
03.01.2006 00:03:00
Tommy
Ich möchte in der Userform aus der Textbox8 den "Namen(1,2,3...)" in der Tabelle "Depot" Spalte C "Namen(1,2,3...)" suchen lassen und anschliessend die Werte der anderen textboxen in die dem entsprechende Zeile schreiben lassen.
Das mit den Textboxen in Zeilen schreiben wurde wie folgt gelöst aber mit der Zuordnung von Userform textbox8 in spalte C suchen klappt nicht....
Private Sub CommandButton5_Click()
Set frm = UserForm1
If Trim(textbox_8) = "Namen1" Then
Sheets("depot").Activate
Range("D5").Select
ActiveCell.Value = .TextBox4.Value
ActiveCell.Offset(0, 1).Value = .TextBox5.Value
ActiveCell.Offset(0, 2).Value = .TextBox6.Value
End If
If Trim(textbox_8) = "Namen2" Then
Sheets("depot").Activate
Range("D6").Select
ActiveCell.Value = .TextBox4.Value
ActiveCell.Offset(0, 1).Value = .TextBox5.Value
ActiveCell.Offset(0, 2).Value = .TextBox6.Value
End If
Ich habe in VBA keine Ahnung wäre für eine komplette Lösung im voraus dankbar.
Mfg Tommy