返回列表 上一主題 發帖

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

請問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.韓國
變成跳號了
請問要如何順號呢

謝謝

本帖最後由 軒云熊 於 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 於 2021-6-1 14:56 編輯

回復 1# eric6211


     版大您好,這是我在網路找到的範例,給您做參考。




VBA - 合計買商品金額的表單.rar (20.28 KB)

TOP

        靜思自在 : 君子如水,隨方就圓,無處不自在。
返回列表 上一主題