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

Question

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

Answer 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更改时自动执行此操作，请将逻辑嵌入到 Compute 事件宏或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