In frm1.Initialize befinden sich folgende additems
With cboAnrede2
.additem „Liebe“
.additem „Sehr“
End with
In der Combobox
Private Sub cboAnrede2_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Select Case cboAnrede2.Text
Case „Sehr“
cboAnrede2.Text = „Sehr geehrte“
Case „Liebe“
cboAnrede2.Text = „Liebe“
End Select
End Sub
wird der Inhalt der Combox ergänzt u n d der Einfügecursor ohne zu bläuen (was ja bei einem additem „Sehr geehrte“ passiert) hinter die Einfügung gesetzt. Gibt es einen anderen, besseren Weg, den Cursor hinter die Einfügung in der Combobox (ohne Bläuen) zu setzen?
THX Wilhelm