Enter Event löst nicht immer aus
22.12.2015 10:08:59
Christopher
Ich hab in einer Tabelle ein Paar "Werte" stehen die ab und zu mal variieren.
Ich habe eine Combobox in der diese Namen angezeigt werden.
Also hab ich folgendes gemacht:
'===============================
'|START
'|Combobox 13
'|Stundensatz
'===============================
Private Sub ComboBox13_Enter()
Set SHRIMP = ThisWorkbook.Sheets("SHRIMP")
ComboBox13.Clear
ComboBox13.AddItem SHRIMP.Cells(2, 27).Value & " " & SHRIMP.Cells(2, 32).Value
ComboBox13.AddItem SHRIMP.Cells(2, 28).Value & " " & SHRIMP.Cells(2, 33).Value
ComboBox13.AddItem SHRIMP.Cells(2, 29).Value & " " & SHRIMP.Cells(2, 34).Value
ComboBox13.AddItem SHRIMP.Cells(2, 30).Value & " " & SHRIMP.Cells(2, 35).Value
ComboBox13.AddItem SHRIMP.Cells(2, 31).Value & " " & SHRIMP.Cells(2, 36).Value
'|ENDE
'|Combobox 13
End Sub
Nur leider funktioniert das manchmal nicht beziehungsweise nur beim ersten mal.Ich finde im Internet nichts da jeder nur irgendwas mit "Enter Taste" sucht.
Ich möchte nicht unbedingt einen Button einfügen um die Combobox zu füllen
oder es mit dem Initialize Event des Userforms machen.
Normal sollte dies doch möglich sein oder?
Vielen Dank schon mal und ein frohes Fest !!!