返回列表 上一主題 發帖

[發問] VBA下拉式選單(已解決)

chin15

帖子
227 
主題
3 
精華
1 
積分
273 
點名
0  
作業系統
XP 
軟體版本
XP 
閱讀權限
20 
性別
女 
註冊時間
2011-3-22 
最後登錄
2013-1-29 
1# 跳轉到 »
發表於 2011-5-17 11:23 | 顯示全部帖子
例如：
Private Sub UserForm_Initialize()
Dim i%
i = Range("A65536").End(xlUp).Row
Me.ComboBox1.List = Sheet1.Range("A1:A" & i).Value
End Sub

TOP

        靜思自在 : 做該做的事是智慧，做不該做的事是愚癡。
返回列表 上一主題