如何讓您的組合框選擇選擇的項目（自我解決）

Question

我已經操縱和嘗試了不同的方式去做某件事。我在窗體上有一個組合框（Coding_drop_down）（Coding Pop Up）。

我以前從別人那裏接管了這個數據庫的維護，所以一切都已經存在。組合框本身有一個值列表，並在單擊下拉箭頭時引用它。然而，我已經改變了這一點，並將其綁定到我創建的表格（對於過去的事情）。現在，當我進入下拉菜單時，我會獲得那些只從表格而非數值列表加載的特定值。問題是，當選擇它不選擇的值時。我是否錯過了某些東西，或者是否需要操縱VBA？

VBA代碼的組合框：

Private Sub Command1_click() 
On Error GoTo Err_Command1_Click 

    Dim stDocName As String 

    stDocName = "Query to do easier coding" 
    DoCmd.OpenQuery stDocName, acNormal, acEdit 

Exit_Command1_Click: 
    Exit Sub 

Err_Command1_Click: 
    MsgBox Err.Description 
    Resume Exit_Command1_Click 

End Sub 

按鈕的代碼：

Private Sub Command7_Click() 
On Error GoTo Err_Command7_Click 

    Dim stDocName As String 
    Dim stLinkCriteria As String 
    stDocName = "Query to do easier coding" 
    DoCmd.Close acForm, stDocName 

    DoCmd.OpenForm stDocName, , , stLinkCriteria 

Exit_Command7_Click: 
    Exit Sub 

與實際組合框的上Click事件：

Private Sub Coding_drop_down_Click() 
Dim test As String 
test = Me.Coding_drop_down 
MsgBox test 

End Sub 

Answer 1

問題是組合框實際上綁定了某些東西，這就是問題的原因。

Answer 2

好的，試試這個爲你的組合框，它可能會給你一個好的開始。您需要在comboxBox中的項目列在.addItem中，一旦表單啓動，它們就會添加到組合框中。當您選擇該項目時，它會將該值存儲在所需工作表的第一個單元格中。如果這件事可以幫助你，讓我知道，我們可以努力幫助你解決問題。

Private Sub UserForm_Initialize() 

With ComboBox1 
    .AddItem ("Item 1") 
    .AddItem ("Item 2") 
    .AddItem ("Item 3") 
End With 

End Sub 

Private Sub ComboBox1_Click() 


    ActiveSheet.Range("A1") = ComboBox1.Value 

End Sub