2014-02-24 102 views
0

有沒有辦法做到以下幾點:?Excel VBA Userform - 如何將一個值添加到用戶窗體中的列表中的組合框?

我想要一個手動文本框,填寫時用戶單擊「添加」,它將值添加到組合框。但是,我也將這個列表存儲在某個地方,以便下次用戶加載表單時,他們可以從列表中選擇「先前使用」項目,然後這些項目也將添加到組合框中。

我將添加一個按鈕來「添加所有」以前的項目,但它仍然必須有選項手動添加項目,每次。

更有用的是有一個選項來檢查組合框中的項目以及手動文本輸入選項。

我試圖添加一個圖像,我發現更好地解釋這一點,但我需要10個代表點。因此,我希望這是有道理的,但請隨時評論更多的細節和更好的解釋,如果需要的話。

鏈接到的我在想什麼,但沒有人工添加現場一個例子:

http://kb.blackboard.com/download/attachments/14057766/bbui_multi_select.gif?version=1&modificationDate=1202823953747

回答

0

使用此

combobox1.additem txtValue.Text 

Sheets("SheetName").Cells(lastRow+1,col).value=txtValue.Text 

還添加以下代碼Form_activate

For i=1 to lastrow 
combobox1.additem Sheets("SheetName").Cells(i,col).value 

next i 
+0

如果我在用戶窗體中使用combobox1.additem txtValue.Text,並將其分配給一個按鈕將工作? – Petay87

+0

是的,它會工作! –

相關問題