EXCEL/VBA HELP ---- 有没有办法根据另一个单元格输入在 excel 中显示一个复选框？

【问题标题】：EXCEL/VBA HELP ---- Is there a way to show a checkbox in excel based on another cells input?EXCEL/VBA HELP ---- 有没有办法根据另一个单元格输入在 excel 中显示一个复选框？
【发布时间】：2018-05-04 00:53:00
【问题描述】：

如果单元格 A1 包含值 A，则会出现一个复选框A。如果单元格 A1 包含 B 值，则会出现一个复选框B。这可能吗？

【问题讨论】：

是的，这是可能的。如果您展示您正在使用的代码，我们可以更轻松地为您提供帮助。不过，一般来说，在 Worksheet_Change 事件 Sub 中为该工作表创建代码并检测对单元格 A1 的任何更改。如果你得到你正在寻找的值，那么对于有问题的复选框，你可以切换可见性.Visible。

标签： excel vba checkbox conditional-statements

【解决方案1】：

类似：

Sub ShowHide()
    With ActiveSheet
    Select Case Range("A1").Value
        Case "A"
            .Shapes("CheckboxA").Visible = True
            .Shapes("CheckboxB").Visible = False
        Case "B"
            .Shapes("CheckboxA").Visible = False
            .Shapes("CheckboxB").Visible = True
        End Select
     End With
End Sub

如果您希望在 A1 更改时自动发生这种情况，则将逻辑嵌入到计算事件宏或 Worksheet_Change 宏中。

出于测试目的，我用它来创建盒子：

Sub Macro1()

    ActiveSheet.CheckBoxes.Add(171, 18, 72, 65.25).Select
    Selection.Name = "CheckboxA"

    ActiveSheet.CheckBoxes.Add(180, 81, 54, 54.75).Select
    Selection.Name = "CheckboxB"

End Sub

【讨论】：