KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何在儲存格清單中自動填入序號,同時跳過空白儲存格?

作者Xiaoyang修改日期

當您在 Excel 中處理資料清單時,經常會遇到某些儲存格未填寫的情況。例如,您可能匯入了資料,或收集的回覆在項目之間留下空白儲存格。此時,您或許希望僅為已填寫的儲存格產生連續序號,將所有空白項目排除於編號系統之外,確保序號無間斷。這樣不僅讓您的清單更井然有序,還能大幅提升可讀性,特別是在需要交叉參照行號或系統化追蹤項目時。

以下是一個包含部分空白列的清單範例。我們的目標是僅為含有資料的儲存格自動填入序號,並跳過所有空白項目,如下圖所示:

自動填入序號並跳過空白

本文將介紹幾種在 Excel 中實現此功能的實用方法:


<2 style="border-bottom: solid2px #217346;">使用公式自動填入序號並跳過空白儲存格

若想輕鬆為非空白儲存格編號,同時自動跳過資料集中的所有空白列,最有效的方法就是結合使用 Excel 的 COUNTA、ISBLANK 與 IF 函數。當您資料位於單一欄位,且希望在儲存格包含內容時快速產生連續序號,此方法尤其適用。

此技巧特別適合用於手動管理的中等規模資料集,或當您需要一種無需程式碼或額外 Excel 工具的快速解決方案時。

若要實作此解決方案,請依照下列步驟操作:

1. 選取您希望開始顯示序號的空白儲存格(例如,若您的資料位於 A 欄且從 A2 開始,請選取 B2),並輸入下列公式:

=IF(ISBLANK(A2),"",COUNTA($A$2:A2))

參數說明:

  • A2:正在檢查儲存格是否為空白。
  • $A$2:A2:向下填滿時會自動擴展的範圍,用於計算截至目前為止出現了多少個非空白儲存格。
  • 此公式僅在 A 欄對應儲存格含有資料時,才會傳回序號;否則將傳回空字串。

2. 按下 Enter 鍵確認公式,接著將游標移至儲存格右下角,待填滿控點出現後,沿著您的清單向下拖曳。公式將自動為每一列更新,僅對含有資料的儲存格進行編號,並保留空白列不變。

為達最佳效果,請確認目標儲存格不含任何空格或不可見字元。若發現錯誤或意外的空白,請清除這些儲存格中的多餘內容。若您的數據區域經常變動,建議將範圍轉換為表格,讓公式管理更加輕鬆自如。

成功套用公式後,您將獲得類似下方截圖的結果:

使用公式自動填入序號並跳過空白

若遇到計算錯誤,請檢查資料集中是否包含不正確的範圍參照或合併儲存格,這些因素有時會干擾序號的產生。

kutools for excel AI 的螢幕截圖

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

  • 智慧執行:透過簡易指令,輕鬆執行儲存格操作、分析資料,並建立圖表!
  • 自訂公式:打造專屬公式,讓您的工作流程更順暢!
  • VBA 編碼:輕鬆撰寫並套用 VBA 程式碼,立即提升工作效率!
  • 公式解析:輕鬆掌握複雜公式!
  • 文字翻譯:輕鬆打破試算表中的語言隔閡!
運用 AI 驅動的工具強化您的 Excel 能力。立即下載體驗前所未有的高效!

VBA 程式碼-自動產生並填入序號,同時跳過空白儲存格

對於需要更自動化流程的使用者(尤其是處理長清單或經常變動的資料),VBA 巨集能迅速為非空白儲存格指派序號,同時保留空白項目不變。若您需處理大量資料、節省時間,或希望提供可重複使用的自訂解決方案,此方法正是理想之選。

以下是設定並使用 VBA 巨集來達成此目的的方法:

1. 前往 Excel 頂部功能表中的開發人員工具,點選 Visual Basic。在開啟的視窗中,選取插入> 模組,並將下列程式碼貼到模組中:

Sub FillSerialNumbersSkipBlanks()
    Dim Rng As Range
    Dim cell As Range
    Dim SerialNum As Long
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set Rng = Application.Selection
    Set Rng = Application.InputBox("Select the data range based on which serial numbers will be filled", xTitleId, Rng.Address, Type:=8)
    SerialNum = 1
    For Each cell In Rng
        If Not IsEmpty(cell.Value) Then
            cell.Offset(0, 1).Value = SerialNum
            SerialNum = SerialNum + 1
        Else
            cell.Offset(0, 1).Value = ""
        End If
    Next cell
End Sub

2. 貼上程式碼後,返回 Excel,點擊執行按鈕執行按鈕,系統將彈出對話方塊,提示您選取包含資料的儲存格範圍(例如 A2:A20)。此程式碼會在相鄰欄位(B2:B20)自動填入序號,並跳過原始範圍中的所有空白儲存格。

若選取範圍包含合併儲存格或顯示空白的公式,可能影響結果準確性。建議使用單一且未合併的資料,以確保可靠輸出。若巨集未如預期執行,請確認 Excel 中已啟用巨集,並檢查是否已正確選取數據區域。

此 VBA 解決方案能自動為非空白資料旁指派序號,並可依需求重複應用於不同欄位或範圍。若您希望將序號填入其他欄位,只需調整 cell.Offset(0,1) 的參照即可!


其他 Excel 內建方法-使用適用於 Excel 的 Microsoft Power Query 新增索引並篩選空白項目

適用於 Excel 的 Microsoft Power Query 提供極具彈性的資料處理與轉換方式,包括僅針對非空白儲存格自動產生序號。此方法特別適合用於大型資料集、從外部來源匯入資料,或在來源資料變動時需自動更新的場景。其主要優勢在於高度可重複、自動化,並能同時完成資料清理與編號作業。

若要使用適用於 Excel 的 Microsoft Power Query 在跳過空白的同時填入序號:

  • 首先選取您的數據區域,然後前往資料> 從表格/範圍,將資料載入至適用於 Excel 的 Microsoft Power Query。若系統提示,請允許 Excel 在您的資料周圍建立表格。
  • 在適用於 Excel 的 Microsoft Power Query 編輯器中,篩選出目標欄位為空白的所有列:按一下欄位標題中的下拉箭頭,取消勾選「(null)」,然後按一下「確定」。
  • 排除空白項目後,請前往新增欄位 > 索引欄位,選擇 從 1 開始 以啟用從 1 起始的編排序號,或選擇 從 0 開始 以啟用零基底索引。
  • 按一下關閉並載入,即可將已完整編號且不含空白的資料表返回 Excel。

適用於 Excel 的 Microsoft Power Query 能在您的原始數據變動時輕鬆重新整理,確保序號自動更新。若您的資料結構可能頻繁變更,此方法可帶來更高的穩定性與可重複性。然而,對於簡單清單來說,其設定可能比使用公式或 VBA 方法更為複雜。

若遇到問題(例如無法從範圍載入資料),請確認您的資料已妥善整理、未包含合併儲存格,並已格式化為表格。當您在 Excel 中使用 Microsoft Power Query 處理極大量資料時,效能通常穩定,但仍可能需要額外的清理步驟,以處理不一致的輸入資料。

上述每種方法皆可依您的資料量與使用習慣靈活選擇:公式方法適合小範圍操作,快速又直接;VBA 則擅長處理大量或重複性任務;而 Microsoft Power Query for Excel 更在進階使用者面對動態資料集時展現卓越效能。

若您需要進一步協助,建議參閱 Excel 說明或 Kutools 支援文件,獲取更多關於編號與資料組織的實用範例。


最佳 Office 生產力工具

Kutools for Excel-助您脫穎而出

🤖KUTOOLS AI 助手:根據以下內容革新數據分析:智慧執行     產生程式碼  建立自訂公式    分析資料並產生圖表  呼叫增強函數……
熱門功能尋找、標示或標記重複值    刪除空白行    合併列或儲存格而不遺失資料    不使用公式的四捨五入……
超級 VLookup多重條件    多重數值    跨多個工作表    模糊查找……
進階下拉列表簡易下拉式清單    相依下拉式清單    多選下拉式清單……
欄位管理員新增指定數量的欄位    移動欄位   切換隱藏欄位的可見狀態  比較欄位以選擇相同/不同單元格……
精選功能網格聚焦    設計視圖    增強編輯欄    工作簿與工作表管理員資源庫(自動文字)  日期提取    合併工作表    加密/解密儲存格   依清單傳送電子郵件    超級篩選    特殊篩選(篩選粗體儲存格/斜體/刪除線……) ......
頂尖 15 工具組12 文字工具添加文本刪除特定字符……)  50+ 圖表 類型甘特圖……)  40+ 實用公式基於生日計算年齡……)  19 插入工具插入二維碼從路徑插入圖片……)  12 轉換工具金額轉大寫匯率轉換……)  7 合併和拆分工具高級合併行拆分 Excel 儲存格……)……還有更多
在您的慣用語言中使用 Kutools-支援英文、西班牙文、德文、法文、中文及其他 40+ 種語言!

Kutools for Excel 擁有超過 300 項功能,確保您所需的功能觸手可及……


Office Tab-在 Microsoft Office(包含 Excel)中啟用分頁式閱讀與編輯

  • 一秒內在數十份開啟的文件間快速切換!
  • 每天為您減少數百次滑鼠點擊,遠離滑鼠手困擾。
  • 在檢視與編輯多份文件時,讓您的生產力提升高達 50%。
  • 為 Office(包含 Excel)帶來如 Chrome、Edge 與 Firefox 般的高效能分頁體驗。