想請問大神們....
有工作表1固定輸入資料 輸入完後工作表2自動抓取部份資料後集中(如圖範例-左)
想請問可以用公式在工作表2把工作表1要得資料集中後.再把重複的資料篩選出來 留重複的只剩一個嗎?(如圖-右)
能幫幫我嗎 資料大筆 想哭>< 感謝
!
已邀請的邦友 {{ invite_list.length }}/5
Sub test()
Set d = CreateObject("Scripting.Dictionary")
For Each Rng In [a1].CurrentRegion
d(Rng.Value) = d(Rng.Value) + 1
Next
k = d.keys
[h1].Resize(UBound(k) + 1, 1) = Application.Transpose(k)
End Sub
Excel內建有移除重複
可以勾選要判定重複的欄位
1.將 A1 儲存格塞到 H1，6 表示有 6 個欄位，公式如下 :
H1 = INDIRECT(CHAR(65+MOD(ROW()-1,6)) & INT((ROW()-1)/6)+1)
2.複製 H1
H18 表示總共有 18 個儲存格
貼上時選【公式】
結果如下
3.選 H 欄整欄複製
4.直接貼在 H 欄， 貼上時選【值】
5.選 H 欄位去除重複
iThome鐵人賽
看影片追技術