Wern aus Kombinationsfeld in Tabelle schreiben
03.03.2006 11:58:51
Jakob
ich habe eine Userform mit einen Kombinationsfeld erstellt. Für das Kombinationsfeld habe ich folgenden Code verwendet:
Private Sub cboNamensliste_DropButtonClick()
Me.cboNamensliste.RowSource = ("A11:A15")
Me.cboNamensliste.ListIndex = "0"
End Sub
Jetzt möchte ich das bei einer Auswahl aus der Liste der Wert gleich in die Zelle B5 zurückgeschrieben wird. Ich habe es mit folgenden Code versucht aber es klappt nicht.
Private Sub cboNamensliste_AfterUpdate()
Dim varWert As Variant
varWert = Me.cboNamensliste.Value
[b5] = varWert
End Sub
Wenn die Zelle B5 leer ist, füllt er sie erst nachdem ich eine Auswahl aus den Kombinationsfeld getätigt habe und das Kombinationsfeld verlassen habe.
Ist die Zelle B5 bereits gefüllt läßt er im Kombinationsfeld egal was ich auch versuche auszuwählen nur den Wert aus der Zelle B5 zu. Habt Ihr eine Idee wie ich mein Problem lösen kann?
Vielen Dank für Eure Hilfe.
Gruß
J. Freitag