如何在 Excel 中根據另一欄儲存格的值自動為欄位編號？

作者孫修改日期2025-10-10

日常 Excel 作業中，您經常需要根據另一欄是否存在或其內容，自動在某一欄產生編號。例如，您可能希望對記錄排序、計算群組項目數量，或跳過特定標記的項目，這些皆可依據鄰近欄位的資料來達成。如截圖所示，假設您希望自動為 A 欄編號，但僅限 B 欄不含特定值或符合某些條件的列。此方法在追蹤、報表製作或整理清單時特別實用，尤其當並非所有列都需連續編號時。
根據另一欄自動為欄位基於值編號
使用 VBA 根據進階邏輯自動為列編號

根據另一欄自動為欄位基於值編號

若您希望自動為欄位列編號，但僅在另一欄符合特定條件時才執行（例如該欄包含「Total」），可透過公式輕鬆實現。此方法適用於中小型資料集，能直接跳過無需編號的項目（如小計或摘要列）。

1. 在編號欄的第一個儲存格（例如 A1）中，手動輸入 1，作為編號序列的起始值。請參閱截圖：

顯示在要自動編號的欄位第一個儲存格中手動輸入數字 1 的螢幕截圖

2. 在您希望自動編號接續的第二個儲存格（例如 A2）中，輸入下列公式：

=IF(B2="Total","",COUNTIF($A$1:A1,">0")+1)

然後按下 ENTER 鍵。若 B 欄對應的值不是「Total」，此公式會自動填入序列中的下一個編號；若 B 欄為「Total」，該列則保持空白（不予以編號）。

參數說明：

B2： 此儲存格（位於 B 欄）將根據條件進行檢查。您可以調整此參照，以符合您實際資料所在的欄位。
「Total」：請將「Total」替換為您希望在編號時排除的任意值。
$A$1:A1： 此範圍用於計算編號欄位中先前已產生的編號。請務必確認起始儲存格的參照位置，與您在步驟 1 中輸入 1 的位置一致。

顯示用於根據 B 欄的值自動編號 A 欄的 Excel 公式螢幕截圖

提示：此方法最適合用於連續範圍，且需在符合特定條件時跳過編號的情境。複製公式時，請勿超出資料的最後一行，以免產生不必要的空白列或格式設定。若處理動態資料或篩選後的資料集，建議搭配輔助欄位以穩定邏輯，避免出現非預期的編號間隔。

3. 使用自動填滿控制點向下拖曳公式，以涵蓋您希望編號的整個欄位範圍。公式會逐列檢查 B 欄對應的值，判斷是否應產生序列號或予以跳過。請參閱截圖：

顯示套用公式後，A 欄根據 B 欄的值自動編號完成的螢幕截圖

錯誤提醒：完成編號後，若對參照欄位進行排序或篩選，請務必確認公式與範圍是否仍正確對齊，以免因意外錯位而造成編號重複或遺漏。

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

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

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

使用 VBA 根據進階邏輯自動為列編號

當公式編號不夠靈活時（例如，僅需為篩選表格中的可見列編號、跳過特定儲存格內容，或實作自訂邏輯），建議採用 VBA 解決方案。透過巨集，您能建立一套動態編號機制，不僅可配合篩選設定、忽略空白或指定關鍵字，還能隨資料變更自動更新。此方法特別適合結構經常變動的大型活頁簿或資料集。

優點：

僅對篩選後可見的列進行編號，並自動跳過隱藏列。
支援複雜的跳過邏輯，例如略過空白儲存格或使用者自訂的值。
適用於跨工作表的一次性或重複性編號作業，彈性極佳。

注意事項：巨集需於活頁簿中啟用 VBA，使用者在執行任何程式碼前務必先儲存檔案。若因意外中斷或選取錯誤範圍，可能導致編號不完整，因此執行後務必仔細檢查結果。

若要建立進階自動編號巨集，請依下列步驟操作：

1. 按一下開發人員>Visual Basic，開啟 Microsoft Visual Basic for Applications 視窗，再按一下插入> 模組。將下列程式碼複製並貼上至模組中：

Sub AdvancedAutoNumbering()
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim numCol As String
    Dim critCol As String
    Dim skipValue As String
    Dim currentNum As Long
    Dim i As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    ' Set your sheet and columns here
    Set ws = ActiveSheet
    numCol = "A"    ' Column to contain numbering
    critCol = "B"   ' Column with criteria values
    skipValue = "Total"  ' Value to skip, can adjust as needed
    
    ' Get the last used row in the sheet
    lastRow = ws.Cells(ws.Rows.Count, critCol).End(xlUp).Row
    currentNum = 1
    
    For i = 1 To lastRow
        If ws.Rows(i).Hidden = False Then  ' Only number visible rows
            If ws.Cells(i, critCol).Value <> skipValue And ws.Cells(i, critCol).Value <> "" Then
                ws.Cells(i, numCol).Value = currentNum
                currentNum = currentNum + 1
            Else
                ws.Cells(i, numCol).Value = ""
            End If
        End If
    Next i
End Sub

2. 輸入程式碼後，關閉 VBA 編輯器。返回 Excel，按下F5 鍵，或按一下執行按鈕。巨集將根據您設定的邏輯為指定欄位編號——僅針對可見列，並自動跳過條件欄位為「Total」或空白的列。

您可自訂巨集頂端的 numCol、critCol 及 skipValue 變數，輕鬆調整以符合您的資料配置。此巨集亦具高度擴充性——例如支援多個跳過值，或透過 InputBox 提示動態選取欄位，靈活應對各種需求！

疑難排解提示：

若出現「Subscript out of range」錯誤，請確認欄位參照是否正確（例如：工作表中必須存在 B 欄，且所設定的行數須與您的資料相符）。
若未顯示任何編號，請確認工作表是否為作用中狀態，並檢查篩選器是否已隱藏所有列。
為確保最佳效果，請檢查您的資料是否包含合併儲存格或非標準格式內容，這些可能會干擾巨集的執行。

總結建議：公式式解決方案適用於簡單且靜態的編號需求，而 VBA 巨集則在處理大型或動態資料集時更具彈性，特別是在需搭配篩選器或忽略特定值的情境下。執行任何 VBA 解決方案前，務必先儲存工作內容，並盡可能於副本上測試。

最佳 Office 生產力工具

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