返回列表 上一主題 發帖

請問checkbox多重選擇的問題

eric6211

帖子
6 
主題
2 
精華
0 
積分
31 
點名
0  
作業系統
XP 
軟體版本
SP3 
閱讀權限
10 
註冊時間
2011-6-28 
最後登錄
2023-5-9 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2021-5-26 23:50 | 只看該作者

請問checkbox多重選擇的問題

本帖最後由 eric6211 於 2021-5-26 23:51 編輯

範例.rar (17.31 KB)
各位前輩好
小弟要做一個表單,可以利用checkbok多項選擇
目前只有用if 的公式的的要判岓
例如
If CheckBox1.Value = True And CheckBox2.Value = True And CheckBox3.Value = False Then

TextBox1 = "一、" & A & vbCr & _
"二、" & B

但是3 個還好
如果要做到5個或到10個選項[
就要寫超多的if判斷式
請問有其他方式可以寫嗎

謝謝
收藏 分享

eric6211

帖子
6 
主題
2 
精華
0 
積分
31 
點名
0  
作業系統
XP 
軟體版本
SP3 
閱讀權限
10 
註冊時間
2011-6-28 
最後登錄
2023-5-9 
2#
發表於 2021-5-27 11:50 | 只看該作者
範例1.rar (15.89 KB)
各位大大
我爬文看到解決的方式
還有一問題
如果勾選checkbox後要有序號
如
1.日本
2.美國
及
1.日本
2.韓國
請問要如何寫
謝謝

TOP

軒云熊

帖子
254 
主題
6 
精華
0 
積分
310 
點名
0  
作業系統
W10 
軟體版本
Excel 2016 
閱讀權限
20 
性別
男 
來自
台灣 
註冊時間
2019-6-16 
最後登錄
2025-6-21 
3#
發表於 2021-5-27 20:45 | 只看該作者
回復 2# eric6211

mystr = IIf(mystr = "", Ct.Caption, mystr & "。" & vbCr & Ct.Caption)

這段改一下  試試看 感謝
K = K + 1
mystr = IIf(mystr = "", K & "." & Ct.Caption, mystr & "。" & vbCr & K & "." & Ct.Caption)

TOP

        靜思自在 : 有願放在心裡，沒有身體力行，正如耕田不播種，皆是空過因緣。
返回列表 上一主題