如何在 Excel 中一次隱藏多個空白行或列？

Excel 工作表經常包含空白行或列，這些空白行或列可能會使您的資料顯得雜亂並難以閱讀。隱藏這些空白行或列可以改善資料的可見性和呈現效果。本指南涵蓋了快速且高效地隱藏多個空白行或列的不同方法。

使用 VBA 程式碼隱藏多個空白行或列

使用 Kutools AI 隱藏多個空白行或列

使用 Kutools for Excel 刪除多個空白行或列

使用 VBA 程式碼快速隱藏多個空白行或列

以下 VBA 程式碼可以幫助您快速輕鬆地在工作表中隱藏多個空白行或列。

1. 按住「ALT」+「F11」鍵以打開「Microsoft Visual Basic for Applications」視窗。

2. 點擊「插入」>「模組」，然後將以下程式碼貼到「模組」視窗中。

VBA 程式碼：隱藏工作表中的多個空白行

Sub HideEmpties()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For I = 1 To xRg.Row + xRg.Rows.Count
        If Application.WorksheetFunction.CountA(xRg.Rows(I)) = 0 Then
            xRg.Rows(I).EntireRow.Hidden = True
        End If
    Next
End Sub

3. 然後按「F5」鍵執行此程式碼，會彈出一個提示框提醒您選擇要隱藏空白行的資料區域，請參閱截圖：

4. 接著點擊「確定」按鈕，空白行立即被隱藏，請參閱截圖：

注意：若要隱藏多個空白列，請應用以下 VBA 程式碼：

VBA 程式碼：隱藏工作表中的多個空白列

Sub HideEmpties()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For I = 1 To xRg.Column + xRg.Columns.Count
        If Application.WorksheetFunction.CountA(xRg.Columns(I)) = 0 Then
            xRg.Columns(I).EntireColumn.Hidden = True
        End If
    Next
End Sub

使用 Kutools AI 隱藏多個空白行或列

如果您想要更快、更自動化的解決方案，「Kutools for Excel」提供了適用於此任務的便捷工具。透過其 Kutools AI 助手，您可以簡單地用自然語言描述需求，Kutools AI 會為您處理剩餘的部分。

安裝 Kutools for Excel 後，請點擊「Kutools」>「AI 助手」以打開「Kutools AI 助手」面板。在面板中，請指定以下步驟：

1. 選擇您想使用的資料區域。
2. 然後，在聊天框中輸入需求，例如：
   「隱藏空白行」：隱藏選取範圍內的多個空白行
   「隱藏空白列」：隱藏選取範圍內的多個空白列
3. 接著，按下「Enter」鍵或點擊「發送」按鈕。Kutools AI 將分析問題，完成後，請點擊「執行」按鈕以獲取結果。
   

使用 Kutools for Excel 刪除多個空白行或列

在本節中，我將討論如何刪除範圍、工作表或工作簿中不需要的多個空白行或列。「Kutools for Excel」的「刪除隱藏（可見）行與列」功能可以幫助您盡快完成此任務。

安裝 Kutools for Excel 後，請按照以下步驟操作：

1. 選擇您要刪除空白行或列的資料區域，然後點擊「Kutools」>「刪除」>「刪除隱藏（可見）行與列」，請參閱截圖：

2. 在「刪除隱藏（可見）行與列」對話框中，於「尋找範圍」下拉列表中選擇「選擇區域」（您也可以根據需要在此下拉列表中選擇其他選項），從「刪除類型」部分選擇「行」或「列」，並在「詳細類型」部分下選擇「空白行」或「空白列」，請參閱截圖：

3. 然後點擊「確定」按鈕，選取範圍內的空白行或列將立即被移除。請參閱截圖：

注意：使用此功能，您還可以根據需要刪除選取範圍、工作表或工作簿中的隱藏行或列、可見行或列。

結論

如果您希望自動隱藏空白行或列，可以使用 VBA 程式碼，該程式碼可以根據預定義的規則快速篩選並隱藏空行和列。對於不熟悉 VBA 的用戶，Kutools for Excel 提供了一個更直觀的解決方案，讓您無需編寫任何程式碼即可一鍵隱藏或刪除空白行和列，從而提高工作效率。根據具體需求選擇合適的方法，可以顯著優化 Excel 表格管理並提升資料處理效率。如果您有興趣探索更多 Excel 技巧，我們的網站提供數千個教程，幫助您掌握 Excel。