如何在Excel中隐藏行时隐藏复选框？

通常，在隐藏包含复选框的行时，复选框不会随行一起隐藏，而是会与其他行的内容重叠，如下方截图所示。如何在Excel中隐藏行时同时隐藏复选框呢？本文将帮助您解决这个问题。

使用VBA代码在隐藏行时隐藏复选框

使用VBA代码在隐藏行时隐藏复选框

您可以运行以下VBA代码来在Excel中隐藏行时隐藏复选框。

1. 右键单击包含要隐藏复选框的工作表标签，然后从右键菜单中点击 查看代码。

2. 在 Microsoft Visual Basic for Applications 窗口中，复制并将以下VBA代码粘贴到 代码 窗口中。

VBA代码：隐藏行时隐藏复选框

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim xChkBox As CheckBox
    Dim xCell As Range
    Dim xHide As Boolean
    If Target.EntireRow.AddressLocal = Application.Intersect(Target, Target.EntireRow).AddressLocal Then
        xHide = (MsgBox("Hide Rows ???", vbYesNo + vbQuestion, "Kutools for Excel") = vbYes)
        Target.EntireRow.Hidden = xHide
        For Each xChkBox In ActiveSheet.CheckBoxes
            Set xCell = xChkBox.TopLeftCell
            If Not Intersect(xCell, Target) Is Nothing Then
                xChkBox.Visible = Not xHide
            End If
        Next
    End If
End Sub

3. 然后同时按下 Alt + Q 键关闭 Microsoft Visual Basic for Applications 窗口。

4. 选择需要隐藏复选框的 整行，然后会弹出一个对话框，请点击 是 按钮。

然后您可以看到所有复选框都随着行一起隐藏了，如下方截图所示。

备注：若要显示包含复选框的隐藏行，请选择包括隐藏行在内的 整行，并在弹出的对话框中点击 否 按钮。然后带有复选框的行将会显示出来。

相关文章：

• 如何根据今天的日期在Excel中隐藏行？
• 如何在Excel中通过加号或减号隐藏/取消隐藏行或列？