如何使用ToggleButton在另一个Excel工作表中隐藏行？

Question

我有一个工作表，我想放置一个活动的X控件，我希望得到的结果是，当我单击该按钮时在另一张工作表中隐藏一行，然后再次单击该按钮时取消隐藏。

这是我尝试过的代码。

Private Sub PLK08_Click()
    Dim MyC As String
    MyC = Worksheets("stepcleaning").Rows("A12")

    If PLK08.Value Then
        Application.ActiveSheet.Rows(MyC).Hidden = True
    Else
        Application.ActiveSheet.Rows(MyC).Hidden = False
    End If
End Sub

我期望的结果是，当我单击该按钮时在另一张工作表中隐藏一行，然后再次单击该按钮时取消隐藏

Answer 1

这应该是您所需要的。

Private Sub PLK08_Click()
    ThisWorkbook.Worksheets("stepcleaning").Rows(12).Hidden = PLK08.Value
End Sub

请注意，A12是一个单元格，而行号是12，列是A。因此，Rows("A12")不存在，而是Rows(12)或Columns("A")或Range("A12")。因此，如果要隐藏一行，它必须为Rows(12)。