excel取不重復值的方法真是多種多樣,比如使用高級篩選、SQL、函數、VBA完成excel取不重復值。下面以一個例子來說明excel取不重復值的方法。
excel取不重復值方法一:高級篩選
A列姓名有重復的,將A列姓名取不重復值之后放在C列。
操作方法是:單擊數據——高級,打開“高級篩選”對話框,進行如下圖設置。
excel取不重復值方法二:SQL
單擊數據——現有連接,單擊最下面的“瀏覽更多”,按照路徑找到文件,彈出的“導入數據”對話框,單擊“屬性”,打開“連接屬性”對話框,切換到“定義”選項卡,在“命令文本”輸入:select distinct 姓名 as 不重復姓名 from [Sheet1$],確定。
excel取不重復值方法三:VBA
按ALT+F11,打開VBE編輯器界面,單擊插入——模塊,復制下面的代碼,然后按F5鍵運行,在B1開始提取A列不重復姓名。
Sub excel取不重復值()
Dim d As Object
Dim lRow As Long
Dim i As Long
Dim str As Variant
Dim strKey As String
Set d = CreateObject("scripting.dictionary")
lRow = Range("A65536").End(xlUp).Row
str = Range("A1:A" & lRow)
For i = 1 To lRow
strKey = CStr(str(i, 1))
If Not d.exists(strKey) Then
d.Add strKey, strKey
End If
Next i
Range("B1").Resize(UBound(d.keys) + 1, 1) = Application.Transpose(d.keys)
End Sub
excel取不重復值方法四:函數
B1單元格留空或者輸入文字“不重復姓名”,然后在B2單元格輸入公式:=OFFSET($A$1,MATCH(,COUNTIF($B$1:B1,$A$2:$A$15),),)&"",按ctrl+shift+enter,三鍵結束數組公式,完成不重復值提取。