文章編號: 213367 - 上次校閱: 2007年4月6日 - 版次: 4.1

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

檢視此文章適用的產品。
系統提示本文適用於您使用的作業系統之外的作業系統。與您不相關的文章內容已停用。

在此頁中

全部展開 | 全部摺疊

結論

本文將說明兩種方法，您可以用來比較兩個 Microsoft Excel 工作表欄中的資料，並尋找重複的項目。
回此頁最上方

其他相關資訊

方法 1：使用工作表公式

如果要使用工作表公式來比較兩欄中的資料，請依照下列步驟執行：
  1. 啟動 Excel。
  2. 在新的工作表中，輸入下列資料 (保留 B 欄空白)：
    A1:1   B1:C1: 3
A2:2   B2:C2: 5
A3:3   B3:C3: 8
A4:4   B4:C4: 2
A5: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 中，按一下 [編輯] 群組中的 [填滿]，然後按一下 [向下]。

    在 B 欄中會顯示重複的數字，如下列範例所示：
    A1:1   B1:C1: 3
A2:2   B2:2   C2: 5
A3:3   B3:3   C3: 8
A4:4   B4:C4: 2
A5: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
    ' Set CompareRange equal to the range to which you will
    ' compare the selection.
    Set CompareRange = Range("C1:C5")
    ' NOTE: If the compare range is located on another workbook
    ' or worksheet, use the following syntax.
    ' Set CompareRange = Workbooks("Book2"). _
    '   Worksheets("Sheet2").Range("C1:C5")
    '
    ' Loop through each cell in the selection and compare it to
    ' each cell in CompareRange.
    For Each x In Selection
        For Each y In CompareRange
            If x = y Then x.Offset(0, 1) = x
        Next y
    Next x
End Sub
  5. 按 ALT+F11 返回 Excel。
  6. 輸入下列資料 (保留 B 欄空白)：
    A1:1   B1:C1: 3
A2:2   B2:C2: 5
A3:3   B3:C3: 8
A4:4   B4:C4: 2
A5:5   B5:C5: 0
  7. 選取範圍 A1:A5。
  8. 在 Excel 2003 和舊版的 Excel 中，指向 [工具] 功能表上的 [巨集]，然後按一下 [巨集]。

    在 Excel 2007 中，按一下 [開發人員] 索引標籤，然後按一下 [程式碼] 群組中的 [巨集]。
  9. 按一下 [Find_Matches]，然後按一下 [執行]。
在 B 欄中會顯示重複的數字。符合的數字會放到第一欄的旁邊，如下圖所示：
A1:1   B1:C1: 3
A2:2   B2:2   C2: 5
A3:3   B3:3   C3: 8
A4:4   B4:C4: 2
A5:5   B5:5   C5: 0
回此頁最上方
這篇文章中的資訊適用於:
  • Microsoft Office Excel 2007
  • Microsoft Office Excel 2003
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
回此頁最上方
關鍵字：?
kbdtacode kbhowto kbprogramming KB213367
回此頁最上方
Microsoft及(或)其供應商不就任何在本伺服器上發表的文字資料及其相關圖表資訊的恰當性作任何承諾。所有文字資料及其相關圖表均以「現狀」供應，不負任何擔保責任。Microsoft及(或)其供應商謹此聲明，不負任何對與此資訊有關之擔保責任，包括關於適售性、適用於某一特定用途、權利或不侵權的明示或默示擔保責任。Microsoft及(或)其供應商無論如何不對因或與使用本伺服器上資訊或與資訊的實行有關而引起的契約、過失或其他侵權行為之訴訟中的特別的、間接的、衍生性的損害或任何因使用而喪失所導致的之損害、資料或利潤負任何責任。