For Each chk In ActiveSheet.CheckBoxes
If chk.Value = 1 Then '选中了
ChkChecked = True
Else
ChkChecked = False
End If
Next
'chk.Name 是名字,chk.Caption 是显示的内容
Excel-VBA: 复选框CheckBox是否选中
最新推荐文章于 2020-12-10 19:35:38 发布