您目前已離線,請等候您的網際網路重新連線

如何在 Excel 中比較兩欄裡的資料,以尋找重複值

Office 2003 支援已結束

Microsoft 於 2014 年 4 月 8 日結束對 Office 2003 的支援。此變更已影響您的軟體更新和安全性選項。 瞭解這對您的意義為何且如何持續受保護。

結論
本文將說明兩種方法,您可以用來比較兩個 Microsoft Excel 工作表欄中的資料,並尋找重複的項目。
其他相關資訊

方法 1:使用工作表公式

如果要使用工作表公式來比較兩欄中的資料,請依照下列步驟執行:
  1. 啟動 Excel。
  2. 在新的工作表中,輸入下列資料 (保留 B 欄空白):
    A1:1   B1:C1: 3A2:2   B2:C2: 5A3:3   B3:C3: 8A4:4   B4:C4: 2A5:5   B5:C5: 0					
  3. 在儲存格 B1 中輸入下列公式:
    =IF(ISERROR(MATCH(A1,$C$1:$C$5,0)),"",A1)
  4. 選取儲存格 B1:B5。
  5. 在 Microsoft Office Excel 2003 和舊版的 Excel 中,指向 [編輯] 功能表上的 [填滿],然後按一下 [向下填滿]

    在 Microsoft Office Excel 2007 及 Excel 2010 中,按一下 [編輯] 群組中的 [填滿],然後按一下 [向下]

    在 B 欄中會顯示重複的數字,如下列範例所示:
    A1:1   B1:C1: 3A2:2   B2:2   C2: 5A3:3   B3:3   C3: 8A4:4   B4:C4: 2A5:5   B5:5   C5: 0					

方法 2:使用 Visual Basic 巨集

Microsoft 僅提供示範性的程式設計範例,不做任何明示或默示的保證。其中包括 (但不限於) 其適售性與適合某特定用途之默示擔保。本文將假設您已相當熟悉示範所使用的程式設計語言,以及用於建立和偵錯程序的工具。Microsoft 技術支援工程師可以協助說明特定程序的功能,但不會修改這些範例以提供附加功能或建構程序來滿足您的特定需求。 如果要使用 Visual Basic 巨集來比較兩欄中的資料,請使用下列範例中的步驟執行:
  1. 啟動 Excel。
  2. 按 ALT+F11 啟動 Visual Basic 編輯器。
  3. [插入] 功能表上,按一下 [模組]
  4. 在模組工作表中輸入下列程式碼:
    Sub Find_Matches()Dim CompareRange As Variant, x As Variant, y As Variant' 將 CompareRange 範圍設為要和選取範圍進行的值。Set CompareRange = Range("C1:C5")' 注意:如果比較範圍位於其他工作簿' 或工作表,請使用下列語法。' Set CompareRange = Workbooks("Book2"). _'   Worksheets("Sheet2").Range("C1:C5")    '' 重複瀏覽選取範圍中的每個儲存格然後將每個儲存格和' CompareRange 中的每個儲存格進行比較。For Each x In SelectionFor Each y In CompareRangeIf x = y Then x.Offset(0, 1) = xNext yNext xEnd Sub					
  5. 按 ALT+F11 返回 Excel。
  6. 輸入下列資料 (保留 B 欄空白):
    A1:1   B1:C1: 3A2:2   B2:C2: 5A3:3   B3:C3: 8A4:4   B4:C4: 2A5:5   B5:C5: 0					
  7. 選取範圍 A1:A5。
  8. 在 Excel 2003 和舊版的 Excel 中,指向 [工具] 功能表上的 [巨集],然後按一下 [巨集]

    在 Excel 2007 及 Excel 2010 中,按一下 [開發人員] 索引標籤,然後按一下 [程式碼] 群組中的[巨集]
  9. 按一下 [Find_Matches],然後按一下 [執行]
在 B 欄中會顯示重複的數字。符合的數字會放到第一欄的旁邊,如下圖所示:
A1:1   B1:C1: 3A2:2   B2:2   C2: 5A3:3   B3:3   C3: 8A4:4   B4:C4: 2A5:5   B5:5   C5: 0				
match data XL2003 XL2007 XL2010
注意 :本文屬於「快速發佈」文章,係由 Microsoft 技術支援或組織內部直接建立。 本文所包含的資訊是為了回應新問題而依現況提供。 因此為了迅速對外發佈,文章內容可能含有印刷錯誤,而且可能會在不另行通知的情況下進行修改。 如需其他考量事項,請參閱使用規定
內容

文章識別碼:213367 - 最後檢閱時間:12/06/2013 13:47:00 - 修訂: 2.0

Microsoft Excel 2010, Microsoft Office Excel 2007, Microsoft Office Excel 2003

  • kbdtacode kbhowto kbprogramming KB213367
意見反應
"; var Ctrl = ""; document.write("