如何快速從 Excel 的指定列中創建唯一列表（刪除重複項）？

假設您有一個包含重複名稱的列表，現在您想從這個指定列中創建一個唯一的名稱列表，該如何在 Excel 中解決這個問題呢？本教程介紹了一些技巧，可以幫助您快速從指定列中創建唯一列表。

使用高級篩選從列創建唯一列表

使用 VBA 從列創建唯一列表

使用 Kutools for Excel 快速從列創建唯一列表

使用高級篩選從列創建唯一列表

在 Excel 中，您可以應用「高級篩選」功能來從列表中篩選出唯一數據。

1. 點擊 數據 > 高級。參見截圖：

2. 在「高級篩選」對話框中，執行以下操作：

(1) 勾選「複製到其他位置」選項和「 僅唯一記錄」選項；

(2) 將重複項列選擇到「列表區域」文本框，並選擇一個單元格以將唯一列表放入「 複製至」文本框。

3. 點擊 確定。現在唯一列表已經創建。參見截圖：

使用 VBA 從列創建唯一列表

在 Excel 中，您還可以使用 VBA 代碼從指定列創建唯一列表。

1. 按 Alt + F11 打開 Microsoft Visual Basic for Applications 窗口，然後點擊 插入 > 模塊，將以下 VBA 複製並粘貼到新的模塊窗口中。

VBA：從指定列創建唯一列表。

Sub CreateUniqueList()
'Updateby20150519
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
InputRng.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=OutRng, Unique:=True
End Sub

2. 按 F5 鍵或 運行按鈕啟用 VBA 代碼，在彈出的對話框中選擇包含重複項的列表並點擊 確定，然後選擇一個單元格放置結果。參見截圖：

   >>>   

3. 現在，已創建了一個包含唯一名稱的列表。

使用 Kutools for Excel 快速從列創建唯一列表

實際上，使用 Kutools for Excel 的「選擇重複與唯一單元格」功能，您也可以快速從指定列創建唯一列表。

1. 選擇要創建唯一列表的列表（可選擇列標題），然後點擊 Kutools > 選擇 > 選擇重複與唯一單元格。參見截圖：

2. 在彈出的對話框中，勾選「 規則」部分下的「唯一值（包括第一個重複值）」選項。參見截圖：

3. 點擊 確定，然後會彈出一個對話框提醒您所選單元格的數量。參見截圖：

4. 點擊 確定，然後按 Ctrl + C 複製所選單元格，選擇一個單元格並按 Ctrl + V 鍵放置結果。

提示：如果您希望區分大小寫地選擇值，可以在 「選擇重複與唯一單元格」對話框中勾選「區分大小寫」選項。

使用「選擇重複與唯一單元格」功能，您可以僅選擇包括第一個重複項的重複項、僅選擇除第一個重複項之外的重複項，以及選擇除第一個重複項之外的所有唯一值。