Userform和Worksheet中的链接复选框

时间:2018-05-28 10:57:53

标签: excel excel-vba userform vba

我在Userform上填写了表格格式问卷。有些部分只能通过复选框来回答。工作表和用户表单中都存在这些复选框。当用户点击用户表单中的框时,也需要在工作表中勾选(我不知道是否可能)。

2 个答案:

答案 0 :(得分:1)

1)将工作表上的复选框链接到单元格(无论哪个单元格,甚至是另一张单元格)

enter image description here

2)以下是您可以根据自己的喜好改变的代码。请务必将其用作用户表单上复选框的clickevent:

Private Sub CheckBox1_Click()

If CheckBox1.Value = True Then Range("D3").Value = True
If CheckBox1.Value = False Then Range("D3").Value = False

End Sub

3)结果将如下:

enter image description here

答案 1 :(得分:1)

您可以编写一些If语句,以便在UserForm复选框的click或change事件上为工作表复选框分配相同的值。

类似的东西:

Private Sub CheckBox1_Click()

    If Me.CheckBox1.Value = True Then
        ThisWorkbook.Sheets(1).CheckBox1.Value = True
    ElseIf Me.CheckBox1.Value = False Then
        ThisWorkbook.Sheets(1).CheckBox1.Value = False
    End If

End Sub