强制excel勾选复选框

【问题标题】：Force excel to tick checkbox强制excel勾选复选框
【发布时间】：2015-12-06 08:19:08
【问题描述】：

我目前正在制作一个用于跟踪员工时间的 Excel 模板。因为他们有徽章 ID，我让他们扫描启动时间戳的 ID。

我决定使用复选框仅在休息、午餐等后重新打卡，而不是让他们同时打卡。

这可能很耗时，并且还会导致错误的复选框，这就是为什么我想找到一种方法让用户再次扫描他们的 ID，强制勾选复选框并启动每次额外扫描的时间戳。

这可能吗？

【问题讨论】：

【解决方案1】：

使用 ActiveX 控件，您可以使用类似的方式勾选复选框（复选框称为“CheckBox1”）

With ActiveSheet
    .CheckBox1.Value = True
End With

并使用以下方法取消勾选：

With ActiveSheet
    .CheckBox1.Value = False
End With

对于表单控件复选框，您可以使用以下方法执行相同操作：（此处的复选框称为“复选框 1”）

With ActiveSheet
    .Shapes("Check Box 1").OLEFormat.Object.Value = 1
End With

然后取消勾选

With ActiveSheet
    .Shapes("Check Box 1").OLEFormat.Object.Value = 0
End With

然后，您可以在扫描“ID”并放入时间戳时运行它

【讨论】：