如何在 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 中使用加號或減號隱藏/取消隱藏列或行？