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

請問checkbox多重選擇的問題-1

eric6211

小學生 Rank: 1

帖子: 6
主題: 2
精華: 0
積分: 31
點名: 0
作業系統: XP
軟體版本: SP3
閱讀權限: 10
註冊時間: 2011-6-28
最後登錄: 2023-5-9

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2021-5-28 00:01 | 只看該作者

請問checkbox多重選擇的問題-1

範例2.rar (19.01 KB)
謝謝軒云熊大大的回復
因為權限不夠，所以無法回覆謝謝
請問checkbox多重選擇的問題

http://forum.twbts.com/viewthrea ... mp;page=1#pid115198
K = K + 1
mystr = IIf(mystr = "", K & "." & Ct.Caption, mystr & "。" & vbCr & K & "." & Ct.Caption)

測試是沒問題
但
如果勾選checkbox後要有序號
如
1.日本
2.美國
如果選
日本及韓國
就變成
1.日本
3.韓國
變成跳號了
請問要如何順號呢

謝謝

軒云熊

中學生 Rank: 2

帖子: 254
主題: 6
精華: 0
積分: 310
點名: 0
作業系統: W10
軟體版本: Excel 2016
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2019-6-16
最後登錄: 2025-6-21

2^#

發表於 2021-5-28 20:31 | 只看該作者

本帖最後由軒云熊於 2021-5-28 20:33 編輯

回復 1# eric6211

改這樣試試看有沒有問題感謝

If TypeName(Ct) = "CheckBox" Then
      If Ct.Value = True Then
         k = k + 1
         mystr = IIf(mystr = "", k & "." & _
         Ct.Caption, mystr & "。" & vbCr & k & "." & Ct.Caption)
      End If
End If

TOP

jeffrey628litw