如何在 Excel 中篩選清單，並刪除其餘隱藏或可見的列？

作者Siluvia修改日期2025-07-01

在 Excel 中處理大型資料集時，通常會先篩選清單，僅顯示分析或報表所需的資料。然而，篩選完成後，您可能還希望進一步移除不再需要的列——無論是刪除所有隱藏列（即被篩選排除的列），還是刪除所有可見列（即您選擇保留檢視的列），以精準留下關鍵資訊。妥善管理篩選後的資料，不僅能簡化工作表、減少干擾，更能確保僅保留真正相關的內容。本文將介紹幾種在 Excel 中可靠刪除篩選清單之隱藏列或可見列的方法，助您根據實際需求高效清理資料。

使用 VBA 程式碼刪除作用中工作表的隱藏列
 透過選取所有可見儲存格來刪除篩選清單的可見列
 使用 Kutools for Excel 輕鬆刪除篩選清單的隱藏列或可見列

使用 VBA 程式碼刪除作用中工作表的隱藏列

當您在 Excel 中篩選資料時，不符合條件的列會被隱藏，但仍保留在工作表中。若您希望快速一步驟移除所有這些隱藏列，而非逐一手動刪除——特別是在處理大型資料集時，手動操作不僅耗時，還容易出錯——此時只需透過簡單的 VBA 巨集，即可一次清除作用中工作表內所有隱藏列，無論這些列是因篩選或使用者手動隱藏所致。當您只想保留目前可見（已篩選）的資料，並捨棄其他內容時，此方法尤其實用。

操作步驟如下：

1. 首先，請確保包含篩選清單的工作表已處於作用中（已選取）狀態。

2. 同時按下 Alt+F11，即可開啟 Microsoft Visual Basic for Applications（VBA）編輯器視窗！

3. 在 VBA 編輯器中，點選頂部功能表的插入，再選擇模組，並將下列 VBA 程式碼複製貼上至模組視窗中：

VBA 程式碼：刪除隱藏列

Sub RemoveHiddenRows()
	Dim xRow As Range
	Dim xRg As Range
	Dim xRows As Range
	On Error Resume Next
	Set xRows = Intersect(ActiveSheet.Range("A:A").EntireRow, ActiveSheet.UsedRange)
	If xRows Is Nothing Then Exit Sub
		For Each xRow In xRows.Columns(1).Cells
			If xRow.EntireRow.Hidden Then
				If xRg Is Nothing Then
					Set xRg = xRow
				Else
					Set xRg = Union(xRg, xRow)
				End If
			End If
		Next
		If Not xRg Is Nothing Then
			MsgBox xRg.Count & " hidden rows have been deleted", , "Kutools for Excel"
			xRg.EntireRow.Delete
		Else
			MsgBox "No hidden rows found", , "Kutools for Excel"
		End If
	End Sub

4. 若要執行程式碼，請按下 F5 鍵，或點選工具列中的執行按鈕。執行後，若您的當前工作表包含隱藏列，將彈出對話方塊，告知已刪除多少隱藏列。請點擊確定以完成刪除。詳情請參閱下方截圖：

出現提示框，顯示已刪除多少列隱藏列

若作用中工作表沒有隱藏列，系統將顯示訊息通知您：

出現提示框，通知沒有隱藏列

注意事項與提示：

此巨集將移除所有隱藏的列，無論是透過篩選還是手動隱藏的。
執行巨集前，請務必確認已選取正確的工作表。由於執行 VBA 程式碼後無法復原，建議您事先備份檔案。
若您有公式引用了即將被刪除列之後的儲存格，請注意：刪除該列可能會影響後續的計算與參照結果。

透過 KUTOOLS AI 解鎖 Excel 的神奇功能

智慧執行：透過簡易指令，輕鬆執行儲存格操作、分析資料，並建立圖表！
自訂公式：打造專屬公式，讓您的工作流程更順暢！
VBA 編碼：輕鬆撰寫並套用 VBA 程式碼，立即提升工作效率！
公式解析：輕鬆掌握複雜公式！
文字翻譯：輕鬆打破試算表中的語言隔閡！

運用 AI 驅動的工具強化您的 Excel 能力。立即下載體驗前所未有的高效！

使用「選取所有可見儲存格」功能刪除篩選清單的可見列

在某些情況下，您可能希望僅刪除套用篩選後的可見列——例如保留被篩選掉（隱藏）的項目，以便後續處理或審查。Excel 內建功能能有效刪除篩選清單中的所有可見列，同時完全不影響隱藏列。當您需要清除已處理或已選取的資料，卻又想保留隱藏項目（例如已完成的任務或已審核的記錄）時，此方法格外實用。

操作步驟如下：

1. 選取篩選清單的完整範圍，包含可見與隱藏的列。

2. 按下 F5（或 Ctrl+G）以開啟定位對話方塊，再點擊左下角的特殊按鈕，即可開啟「定位條件」選項。請參閱截圖：

在「前往」對話框中按一下「特殊」按鈕

3. 在定位條件對話方塊中，選取僅限可見儲存格，再按一下確定，即可僅反白標示您所選區域中的可見列（未被篩選或以其他方式隱藏的列）！

勾選「僅限可見儲存格」選項

4. 選取可見列後，在反白區域內任意位置按一下滑鼠右鍵，然後從內容功能表中選擇刪除行。

在右鍵選單中按一下「刪除列」

此操作將立即移除所有可見列，而先前隱藏的列在過濾條件下則不受影響，是快速將工作表精簡至僅剩這些隱藏列的有效方法。

重要提醒：

一開始選擇範圍時務必謹慎——務必包含所有目標列，即使目前處於隱藏狀態的列也不例外。
若您儲存並關閉檔案，「刪除列」的動作將無法復原。進行此不可逆變更前，建議您先備份檔案。
此方法適合偶爾從篩選資料集中刪除可見列，但若需處理多個範圍或頻繁執行此類操作，則可能較耗時。

使用 Kutools for Excel 輕鬆刪除篩選清單的隱藏列或可見列

雖然上述手動與 VBA 方法相當常用，但在頻繁處理複雜或大型工作表時，可能不夠靈活或便利。為更高效滿足這些需求，刪除隱藏行/列工具（內建於）Kutools for Excel）提供直覺又便捷的操作方式，可快速刪除選取區域、當前工作表，甚至所有工作表中的隱藏列或可見列。此方法不僅節省寶貴時間，更能大幅降低手動操作所導致的錯誤風險，特別適合經常需要清理與處理大型資料集的使用者！

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

以下是使用 Kutools for Excel 執行此任務的方法：

1. 選取您要刪除隱藏列或可見列的篩選範圍。

2. 前往 Excel 視窗頂部的 Kutools 分頁，點選刪除 > 刪除隱藏行/列。操作步驟請參閱下方截圖指引：

點擊 Kutools 的「刪除隱藏（可見）列與欄」功能

3. 在彈出的刪除隱藏行/列對話方塊中設定選項：
– 在搜尋範圍下拉式選單中，保持選取選擇區域（或依任務需求選擇其他選項）
– 在刪除類型區段中，勾選列
– 在詳細類型區段中，依需求選擇可見列或隱藏列
– 按一下確定以確認並執行

在對話框中設定選項

4. 執行後，確認方塊將明確顯示已刪除的列數。點選確定即可完成操作。

使用注意事項與提示：

Kutools 讓您輕鬆選取特定範圍，或一次套用至整個工作表，大幅提升批次處理效率。
此方法能有效降低因手動選取而產生的錯誤，尤其適用於大型工作表。
若您需要處理大量清單或經常進行資料清理，此解決方案將格外便利。
在按一下「確定」前，務必確認您所選的區域與操作選項。

想免費試用此工具 30 天嗎？立即下載，並依照上述步驟操作！

使用 Kutools for Excel 刪除篩選清單的隱藏列或可見列

最佳 Office 生產力工具

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