小弟新手!
現在想撰寫一個VB程式:
功能是點擊插入的復選框就在sheet1里面單元格A1自動賦值ture,取消勾選賦值false,怎么實作呢
Sub CheckBox2_Click()
If CheckBox2.Value = 1 Then
Sheet1.Cells(a, 1).Value = "ok"
End If
End Sub
uj5u.com熱心網友回復:
搞這么復雜干嗎?給單元設個資料有效性,序列 TRUE,FALSE 不就行了。
uj5u.com熱心網友回復:
Private Sub CheckBox2_Click()If CheckBox2.Value = True Then
[A1] = "True"
Else
[A1] = "False"
End If
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/89578.html
標籤:VBA
上一篇:請教lyserver,關于VB中快速找到大檔案中包含的字串的問題
下一篇:vb中怎樣判斷物理網卡
