標題: 【請問】如何比對重複資料並加以標示 [打印本頁]

---

作者: ky2599y    時間: 2011-8-8 17:47     標題: 【請問】如何比對重複資料並加以標示

本帖最後由 ky2599y 於 2011-8-8 20:12 編輯

請問各位前輩,
檔案中電話號碼欄位若有重複的
我想將時間早的(或是列數少的)找出來，並在J欄位顯示"D"
只有一筆與時間最新的(列數最高的)在J欄顯示"O"

請問這個需求如何能達到，煩請幫忙，謝謝。

---

作者: oobird    時間: 2011-8-8 18:00

怎麼標題與內容是兩碼事？附件也沒你說的情形。

---

作者: ky2599y    時間: 2011-8-8 18:09

回復 2# oobird

    抱歉!我已經將主題與附件，修改過了，謝謝提醒。

---

作者: oobird    時間: 2011-8-8 21:48

1. For I = 2 To [h65536].End(3).Row
   
2. If Application.CountIf([h:h], Cells(I, 8)) > 1 And [h:h].Find(Cells(I, 8), , , 1).Row = I Then
   
3. Cells(I, 10) = "D"
   
4. ElseIf [h:h].Find(Cells(I, 8), , , 1, , 2).Row = I Then
   
5. Cells(I, 10) = "O"
   
6. End If
   
7. Next

複製代碼

---

作者: ky2599y    時間: 2011-8-10 14:13

回復 4# oobird


  已可以使用了，感謝版大的幫忙，謝謝。

---

作者: kaigan89    時間: 2011-8-19 20:53

超級版主真厲害！

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)