2017-01-22 33 views
0

如何將組合框和列表框添加/獲取(將顯示成員的值和名稱與.NET相同)?如何在excel中添加/獲取組合框中的項目VBA

基本上,我想顯示名稱給用戶,並從下拉框選擇姓名後,我想基於名稱選擇進一步使用得到說明

使用下面的代碼我加入名稱到組合框,但不知道怎麼加DESC爲itmeindexColumn(這是從DB DESC列)。 (同樣喜歡valuemember,Displaymember在.NET組合框)

Dim rs As New ADODB.Recordset 
Dim sqltextexec As String 
Set rs = New ADODB.Recordset 

sqltextexec = " SELECT Name , Name + '-' + Code 'Desc' from Employee " 
    rs.Open sqltextexec, cn 
    rs.MoveFirst 
With Sheets("Sheet1").ComboBox1 
    .Clear 
    Do 
     .ComboBox1.AddItem rs![Name] 
     rs.MoveNext 
    Loop Until rs.EOF 
End With 
+0

http://stackoverflow.com/help/someone-answers –

回答

1

首先,你必須在提出片斷一個錯字

.ComboBox1.AddItem rs![Name] - >.AddItem rs![Name]

來指代選定的索引和組合框的文本,分別使用.ListIndex.Value。您也可以使用.Text作爲文本。例如:

Private Sub ComboBox1_Change() 
    Debug.Print ComboBox1.ListIndex, ComboBox1.Value, ComboBox1.Text 
End Sub 
+0

但我怎樣才能增加價值爲組合框和組合框的值項目不應該顯示給用戶。 – user1818042

相關問題