更新链接的复选框

Question

我正在努力尝试解决一个简单的问题。 我在表1中的复选框和表2中的复选框必须假设与表1中的值相同（TRUE或FALSE）。 问题是，当我打开Sheet 2时，它们没有被标记，但是我必须用鼠标点击它们。

我正在使用此代码：

 Sheet2.chk_2A.Value = Sheet1.chk_1a.Value

我忘记了自动更新命令或类似的东西吗？

Answer 1

据我所知，如果将两个复选框链接到同一个单元格，则不需要VBA代码。只需在project，Format Control...，Control中为同一单元格指定两个复选框。如果这不是一个选项，那么您必须将代码放入子网站，并在点击后将此子网址分配给这些复选框。

在这种情况下，您的代码取决于您是否使用了表单控件或ActiveX控件。对于表单控件，您必须使用

Cell link:

对于ActiveX控件，如果正确命名了复选框，则代码建议应该有效。

Sheet2.Shapes("chk_2A").controlformat.value = Sheet1.Shapes("chk_1a").controlformat.value

在这两种情况下，我都假设您使用了表单控件或ActiveX控件。如果您使用了一个表单控件和一个ActiveX控件，那么您必须相应地调整上面的代码建议。以下代码可以帮助您确定使用的内容。

Sheet2.chk_2A.value = Sheet1.chk_1a.value