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

作者Xiaoyang修改日期2025-04-07

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 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

安裝 Kutools for Excel 後，請點擊「Kutools」>「AI 助手」，即可開啟「KUTOOLS AI 助手」窗格。在窗格中，請依照下列步驟操作：

選取您要使用的數據範圍。
接著，在聊天框中輸入需求，例如：
「隱藏空白列」：隱藏選取範圍中的多個空白列
「隱藏空白列」：隱藏選取範圍中的多個空白列
接著按下「ENTER 鍵」或點擊「傳送」按鈕，KUTOOLS AI 將立即分析您的問題；完成後，請點擊「執行」按鈕以取得結果。

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

本節將說明如何快速刪除範圍、工作表或活頁簿中多餘的空白列與欄。「Kutools for Excel」的「刪除隱藏行/列」功能可助您迅速完成此任務。

安裝 Kutools for Excel 後，請依下列步驟操作：

1. 選取欲刪除空白列或欄的資料區域，接著點擊「Kutools」＞「刪除」＞「刪除隱藏列／行」，詳情請參閱截圖：

2. 在「刪除隱藏行/列」對話方塊中，於「搜尋範圍」下拉清單選取「選擇區域」（您也可依需求選擇清單中的其他選項），在「刪除類型」區段選取「列」或「欄」，並於「詳細類型」區段選擇「空白列」或「空白欄」，請參閱截圖：

3. 點擊「確定」按鈕，即可立即刪除所選範圍中的空白列或欄。請參閱截圖：

注意：透過此功能，您還可根據需求，刪除所選範圍、工作表或活頁簿中的隱藏列／欄或可見列／欄。

結論

若您希望自動隱藏空白列或欄，可使用 VBA 程式碼，根據預先定義的規則快速篩選並隱藏空白列與欄。對於不熟悉 VBA 的使用者，Kutools for Excel 提供了更直覺的解決方案，讓您無需撰寫任何程式碼，即可一鍵隱藏或刪除空白列與欄，大幅提升工作效率！根據實際需求選擇合適的方法，不僅能優化 Excel 表格管理，更能顯著提升資料處理效率。立即探索我們網站上的數千篇教學文章，輕鬆精通 Excel 技巧！

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多