Insoweit ich weiß, dass die Liste der comboboxs geladenes *before* sein muss, angeklickt das combobox t.
So scheint es, dass Sie eine andere Weise finden müssen können, die Wahl zu aktivieren.
Möglicherweise konnten Sie es versuchen, wenn die Form initialisiert, oder eine Wahlgruppe verursachen, oder Vorlagencombobox bilden,…
(Wieder, veranschaulicht dieses nur, warum dieses nichtstandardisierte Funktionalität. ist)
Auf jeden Fall… konnte der Code etwas Ähnliches sein:
'Die Variable verursachen
strWhatList als Schnur verdunkeln
'Die Variable mit laden, was Text der Benutzer in das inputbox einträgt
strWhatList = InputBox („, welche Liste?“ u. vbCrLf u. „(hereinkommen: them für Angestellte oder „EQ“, für Equiptment) ")
', wenn das Benutzerklicken „Löschen“,
'das Unterseeboot ohne die Listen herausnehmen, die in das combobox geladen
Wenn strWhatList = "" dann
'Eine Mitteilung anzeigen, dann die Form öffnen
'(ohne eine Liste im combobox)
MsgBox „keine Liste vorgewählt, um das combobox zu laden. “, vbInformation
'Ausgang
Unterseeboot herausnehmen
ElseIf strWhatList = „EM“ oder strWhatList = „EM“ dann
'Die passende Listenstrecke laden
Me.cboWhatList.RowSource = „=Sheet1! A2: A8“
'Den combobox Aufkleber einstellen
Me.lblWhatList.Caption = „Angestellte“
ElseIf strWhatList = „EQ“ oder strWhatList = „eq“ dann
Me.cboWhatList.RowSource = „=Sheet1! B2: B6“
Me.lblWhatList.Caption = „Equiptment“
Sonst
MsgBox „unzulässiger Wert, keine Liste lud im combobox. “, vbInformation
Unterseeboot herausnehmen
Beenden wenn
Ich bin sicher, dass Sie Sie in der Lage sind, dieses Arbeit in Ihrer Datenbank anzupassen.
Ich angebracht eine Probe
; -)
JeffCoachman
