返回列表下一主題上一主題發帖

[發問] 表單問題請問如何控制checkbox數量

iamaraymond

　暱稱: Raymond Chien

中學生 Rank: 2

帖子: 109
主題: 12
精華: 0
積分: 177
點名: 0
作業系統: win10
軟體版本: office2013
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2017-11-19
最後登錄: 2023-7-5

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2018-6-20 12:09 | 只看該作者

[發問] 表單問題請問如何控制checkbox數量

例如我在excel裡面有如下幾筆個股
2305 全友
2324 仁寶
2331 精英
2353 宏碁
2362 藍天
2365 昆盈
2377 微星
2382 廣達
2399 映泰
2465 麗臺

我希望當我按下表單按鈕時
可以自動將這些股票名稱以及股票代號自動帶入表單的checkbox中
(但因為數量不固定，所以無法固定checkbox的數量)
如下圖

希望有大大可以指點一下
感激不盡

樓主熱帖

Excel VBA網頁資料收集教學:
http://forum.twbts.com/thread-20848-1-1.html

jackyq

中學生 Rank: 2

帖子: 319
主題: 6
精華: 0
積分: 309
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2024-4-27

2^#

發表於 2018-6-20 13:40 | 只看該作者

本帖最後由 jackyq 於 2018-6-20 13:47 編輯

listbox

TOP

iamaraymond

　暱稱: Raymond Chien

中學生 Rank: 2

帖子: 109
主題: 12
精華: 0
積分: 177
點名: 0
作業系統: win10
軟體版本: office2013
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2017-11-19
最後登錄: 2023-7-5

3^#

發表於 2018-6-20 15:05 | 只看該作者

回復 2# jackyq

感謝jackyq
想請問一下您是如何做出前面的核取方塊？
因為我用listbox好像沒有核取方塊

Excel VBA網頁資料收集教學:
http://forum.twbts.com/thread-20848-1-1.html

TOP

jackyq

中學生 Rank: 2

帖子: 319
主題: 6
精華: 0
積分: 309
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2024-4-27

4^#

發表於 2018-6-20 15:31 | 只看該作者

本帖最後由 jackyq 於 2018-6-20 15:39 編輯

回復 3# iamaraymond

屬性視窗手動設定 or 用 VBA 寫入屬性
ListBox1.ListStyle = fmListStyleOption
ListBox1.MultiSelect = fmMultiSelectMulti

Private Sub ListBox1_Change()
For w = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(w) Then
Debug.Print "選中 = " + ListBox1.List(w)
End If
Next
End Sub

TOP

iamaraymond