Excel 基于按钮隐藏/取消隐藏图纸的宏

我希望在单击时有一个隐藏/取消隐藏工作表的按钮

当按钮被打勾时，当工作表被隐藏时，我的代码将使工作表可见。但是，当工作表未选中时，它不会使工作表不可见

Sub CheckBox1_Click()

Dim i As Integer
    Sheets("A").Visible = True

End Sub

---

我希望工作表在松开时不可见。

使用

不
和当前
可见
状态切换：

Sub CheckBox1_Click()   
    Sheets("A").Visible = Not Sheets("A").Visible 
End Sub

如果您特别希望确保选中=可见且未选中=隐藏，请使用以下方法：

Private Sub CheckBox1_Click()
    Sheets("A").Visible = CheckBox1.Value
End Sub

对不起，没有看到你的帖子。。。删除了我的答案