Question

excel和VBA相当新。...我想根据参考单元格是否为空，在excel工作表上隐藏某些按钮。因此，该按钮应显示参考单元格是否包含任何值，如果参考单元格为空，则该按钮不可见。运行代码时，出现运行时错误：对象不支持此属性或方法。我已将工作表上的所有按钮重命名。我不确定是什么问题。参见下面的代码...。

Sub hideshowcheckboxes()
Application.ScreenUpdating = False
Sheets("Dispatch TOOL").Select
If Range("D12").Value = " " Then
    Sheets("Dispatch TOOL").check1.Visible = False
Else
    Sheets("Dispatch TOOL").check1.Visible = True
End If
Application.ScreenUpdating = True
End Sub

Answer 1

您使用的CheckBox控件的类型很重要。要使用表单控件，请使用第二种方法。

Sub test()

'ActiveX Object
Sheet1.CheckBox1.Visible = True

'Form Control Object
Sheet1.Shapes("Check Box 2").Visible = False

End Sub

如何根据VBA中的某些单元格条件显示或隐藏按钮？

1 个答案: