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

如何快速計算 Excel 中數值首次出現的次數?

作者Sun修改日期

當您在 Excel 中處理大型資料集時,是否常遇到同時包含重複值與唯一值的清單?有時您可能只想計算每個值的首次出現次數,並將後續重複項視為非唯一值。例如,在某個清單中,某些值雖多次出現,但您希望計數時僅納入每個值的第一次出現(如下方截圖所示)。此操作能協助您快速掌握有多少個「首次出現」的不同項目,而不受後續重複次數影響。在 Excel 中,如何高效達成此需求?

顯示包含重複資料的資料集以及首次出現值計數的螢幕截圖


使用公式計算項目首次出現的次數

計算每個值首次出現次數的直接方法之一,就是運用 Excel 公式。此方法能識別資料集中哪些項目屬於首次出現,並讓您加以加總,輕鬆取得最終計數。

適用情境與價值:此解決方案適用於需處理資料欄,並希望採用公式驅動、可動態更新的方式(資料變更時自動同步更新)。無需安裝任何增益集或特殊權限,多數使用者皆可輕鬆使用,僅需在工作表中新增一個額外欄位即可。

請依照下列步驟開始操作:

1. 選取緊鄰資料集第一筆數值旁的空白儲存格(例如,若您的資料位於 A1:A10,請選取 B1),並輸入下列公式:

=(COUNTIF($A$1:$A1,$A1)=1)+0

按下 Enter 後,向下拖曳填滿控點,即可將公式套用至整個資料欄的每一列。結果會在該值首次出現的列顯示「1」,其餘則顯示「0」。詳情請參閱下方截圖說明:

顯示套用公式以計算首次出現次數的螢幕截圖
箭頭
顯示首次出現計數公式的結果螢幕截圖

提示:在此公式中,$A$1 代表您資料區域的第一個儲存格(請依實際情況調整),而 $A1 則代表目前所在列。若您的資料並非從 A1 開始,請相應調整儲存格參照。透過絕對與相對參照的巧妙搭配,即可在向下複製公式時確保計數結果正確無誤!

2. 若要加總首次出現的總次數,請選取另一個空白儲存格(例如位於新公式欄下方的儲存格),並輸入:

=SUM(B1:B10)

按下 Enter 即可立即取得計數結果!範圍 B1:B10 應與您先前輸入公式的儲存格一致。若您的資料長度不同,或公式位於其他欄位,請務必調整儲存格參照,以確保計算準確無誤。

顯示在 Excel 中用於計算首次出現次數的 SUM 公式螢幕截圖向右箭頭顯示計算首次出現次數結果的螢幕截圖

補充說明:此公式方法可在數值變更、新增或刪除時即時更新計數。請注意,若您的資料區域發生變化(例如插入新欄位),公式範圍可能需要手動擴充。建議將資料轉換為 Excel 表格,即可自動延伸公式,省時又省力!


使用 Kutools for Excel 計算項目首次出現的次數

若您已安裝 Kutools for Excel,即可善用其選擇重複/唯一儲存格功能,輕鬆簡化此流程,特別是在處理大型或複雜資料集時!此工具不僅能協助您標記值的首次出現,還可醒目提示,讓您快速辨識,提升工作效率。

Kutools for Excel搭載 AI 技術🤖提供超過 300 項實用功能,讓您的工作更輕鬆。

免費安裝 Kutools for Excel 後,請依下列步驟操作:

1. 選取您要計算首次出現次數的整個範圍(例如 A1:A10),然後點擊功能區中的 Kutools > 選取 > 選擇重複/唯一儲存格。請參閱下方截圖:

顯示功能區上 Kutools 分頁中的「選取重複與唯一儲存格」選項的螢幕截圖

2. 在選擇重複/唯一儲存格對話方塊中,於唯一值(包括第一個重複值)區段下選取規則選項。如有需要,您還可選擇以特定背景色填滿所選儲存格,或變更字體顏色,讓內容更加醒目!

「選取重複與唯一儲存格」對話框的螢幕截圖

3. 當您點擊確定後,將彈出一個對話方塊,顯示您所選區域中各項目首次出現的總數。此計數包含所有唯一值與重複值的首次出現。請參閱截圖:

顯示包含首次出現次數結果的對話框螢幕截圖

4. 點擊確定以關閉對話方塊。此時,每個項目的首次出現將被選取,並可選擇性地醒目提示,讓您在工作表中輕鬆辨識!

適用情境與注意事項:Kutools 方法非常適合經常處理大型資料表,或需要立即獲得醒目提示結果的使用者,不僅能避免公式錯誤,還可減少手動輸入。但請注意,此方法需系統已安裝 Kutools 增益集。執行前務必確認儲存格選取範圍正確,以確保結果準確無誤。若要取消醒目提示,只需使用 Excel 的復原功能(Ctrl + Z)即可!


使用 VBA 程式碼巨集計算項目首次出現的次數

若希望實現完全自動化的流程,可運用 VBA 巨集遍歷清單,在無需手動輸入公式或依賴外部增益集的情況下,自動計算每個值的首次出現次數。此方法尤其適合處理重複性任務或大型資料集。請注意,使用 VBA 巨集前需先啟用「開發人員」索引標籤,並以巨集啟用格式(*.xlsm)儲存檔案。

適用性與注意事項:此巨集極適合進階使用者,或需處理大規模且頻繁更新資料集的場合。由於此方法會直接修改資料,執行前務必先備份!此外,當使用 Excel 網頁版,或系統安全性設定已停用巨集時,此功能可能無法正常運作。

1. 在 Excel 中,點擊開發人員工具 > Visual Basic。當 Microsoft Visual Basic for Applications 視窗出現後,前往插入 > 模組,並將下列程式碼複製貼上至模組視窗中:

Sub CountFirstInstances()
    Dim rng As Range
    Dim dict As Object
    Dim cell As Range
    Dim firstInstanceCount As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select the range to count first instances:", xTitleId, rng.Address, Type:=8)
    
    Set dict = CreateObject("Scripting.Dictionary")
    firstInstanceCount = 0
    
    For Each cell In rng
        If Not dict.exists(cell.Value) Then
            dict.Add cell.Value, 1
            firstInstanceCount = firstInstanceCount + 1
        End If
    Next cell
    
    MsgBox "The number of first instances in the selected range is: " & firstInstanceCount, vbInformation, "First Instance Count"
End Sub

2. 貼上程式碼後,點擊執行按鈕執行)按鈕,或按下 F5 執行巨集。當系統提示時,選取您要分析的範圍(例如 A1:A10),然後按下確定。此時將彈出對話方塊,顯示所選範圍中各項目的首次出現次數(包含唯一值與重複值的首次出現)。

提示與錯誤預防:若不慎選取錯誤,只需重新執行巨集即可輕鬆修正。程式所使用的 Dictionary 物件會將空儲存格一併納入計算,因此若您的數據區域包含空白列,可能會導致空儲存格計數偏高。為提升準確性,建議避免選取含空白的列,或於使用前先行篩選排除空白資料。此外,VBA 方法可能觸發安全性警告或需啟用巨集權限;如有需要,請調整您的信任中心設定。

疑難排解建議與備註:若巨集無法執行,請確認是否已在「檔案 > 選項 > 信任中心 > 信任中心設定 > 巨集設定」中啟用巨集。執行任何程式碼前,務必先儲存您的工作。此 VBA 程式碼適用於單一欄位的清單;若需處理多欄範圍,請依實際需求調整程式碼。

總結建議:總而言之,選擇公式、Kutools 功能或 VBA 巨集,取決於您的技能水準、資料集規模,以及偏好手動或自動化的解決方案。公式方法靈活,適合小型資料且熟悉 Excel 核心功能的使用者;Kutools 提供快速直覺的視覺化操作(適用於已安裝增益集者);而 VBA 巨集則最適合需要自動化重複作業或處理極大規模資料集的場合。每種方法都能根據您的工作流程,有效識別並統計每個值的首次出現次數。


相關文章:

最佳 Office 生產力工具

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

運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……


Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!

  • 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
  • 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
  • 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!

所有 Kutools 增益集,一個安裝程式

Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!

ExcelWordOutlookTabsPowerPoint
  • 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
  • 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
  • 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
  • 30 天完整功能試用— 無需註冊,無需信用卡
  • 超值之選— 比單獨購買各增益集更省費用