- 帖子
- 7
- 主題
- 3
- 精華
- 0
- 積分
- 10
- 點名
- 0
- 作業系統
- Win XP
- 軟體版本
- SP3
- 閱讀權限
- 10
- 性別
- 女
- 註冊時間
- 2012-8-29
- 最後登錄
- 2012-10-31
|
各位大大,我想請問一下,要怎麼樣可以即時更新combobox內的資料,不用重新執行macro才看的到新增的欄位????
我希望我點了新增按鈕後,輸入我要新增的選項,然後直接按下拉式選單就可以看的到我剛新增的內容,不需要把視窗關掉重新再執行…
=====這個是點新增按鈕===========- Private Sub CommandButton2_Click()
- board_add = InputBox("輸入要新增的版號")
-
- ThisWorkbook.Worksheets("sheet2").Range("b2").End(xlDown).Offset(1, 0).Select
- ActiveCell.Value = board_add
- End Sub
複製代碼 ============這是combobox的內容========- Private Sub UserForm_Initialize()
- With Application.Names.Add _
- ("tmp", ThisWorkbook.Worksheets("sheet2").Range("b2", Range("b2").End(xlDown)))
- board_sel = .RefersTo
- .Delete
- End With
- With board
- .RowSource = board_sel
- .SetFocus
- End With
複製代碼 |
|