如何把重複的資料去掉？ - Excelㄧ般區

帖子: 83
主題: 17
精華: 0
積分: 105
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
註冊時間: 2010-12-28
最後登錄: 2018-8-8

10^#

發表於 2011-1-20 16:39 | 只看該作者

還有一個類似的問題需要解決，但不想胡亂開post浪費論壇資源，唯有跟post發問吧！
我弄了一個千多人的名單給老闆作修改，他自己增減後交給我，但我不清楚有甚麼記錄是新加或已刪除。我現在用的方法是兩個表都向另一個表用vlookup，遇到有#N/A則代表另一個表沒有這個RECORD，但這個方法有點笨，想請教大家可以用其他方法，例如filter可以解決呢？謝謝！

帖子: 83
主題: 17
精華: 0
積分: 105
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
註冊時間: 2010-12-28
最後登錄: 2018-8-8

9^#

發表於 2011-1-19 17:25 | 只看該作者

回復 7# Hsieh

謝謝超版的幫助，這兒真的學到很多，從前還以為excel是個簡單的軟體.....
還有陣子學呢

birdy0815

帖子: 38
主題: 5
精華: 0
積分: 67
點名: 0
作業系統: winXP 和 win7
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2011-1-9
最後登錄: 2013-1-21

8^#

發表於 2011-1-19 15:52 | 只看該作者

原來進階篩選還可以用不同的資料欄來做這樣可以應用在我的計算成績的檔案以及學生資料的記錄方便查詢或篩選等等先試試看又學了一招

Hsieh

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 281
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2025-11-17

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

7^#

發表於 2011-1-18 17:40 | 只看該作者

回復 6# 小俠客

篩選後計算應該比較快速

學海無涯_不恥下問

帖子: 83
主題: 17
精華: 0
積分: 105
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
註冊時間: 2010-12-28
最後登錄: 2018-8-8

6^#

發表於 2011-1-18 16:52 | 只看該作者

本帖最後由小俠客於 2011-1-18 16:53 編輯

回復小俠客
Hsieh 發表於 2011-1-17 21:09

原來我最初說的方法是可行的，但是我操作有問題才弄錯了，謝謝版大的幫助。
那麼我第二個問題是不是不能直接以formula或excel功能計算，要整理數據後才能計算？

帖子: 83
主題: 17
精華: 0
積分: 105
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
註冊時間: 2010-12-28
最後登錄: 2018-8-8

5^#

發表於 2011-1-18 16:45 | 只看該作者

回復 3# linshin1999

請問這個是解決我第一個問題的方法嗎？
我對vba還不是那麼熟悉，不太明白如何使用，我把它放在vba中，run了也沒有效果......
不過還是謝謝你的熱心幫助

Hsieh

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 281
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2025-11-17

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

4^#

發表於 2011-1-17 21:09 | 只看該作者

回復 2# 小俠客

學海無涯_不恥下問

linshin1999

帖子: 199
主題: 45
精華: 0
積分: 252
點名: 0
作業系統: windows 7 (X64)
軟體版本: office 2010 (x64)
閱讀權限: 20
性別: 男
來自: 桃園
註冊時間: 2010-12-24
最後登錄: 2020-3-31

論壇贊助勳章論壇榮譽勳章

3^#

發表於 2011-1-17 19:44 | 只看該作者

本帖最後由 linshin1999 於 2011-1-17 20:48 編輯

你好:以下借花獻佛這是 Hiesh 版主,回答版友問的問題所回答的答案,你可以參考看看:

Sub Ex()
Set d = CreateObject("Scripting.Dictionary")
With Sheets(2)
For Each a In .Range(.[A1], .[A65536].End(xlUp))
d(a.Value) = a.Offset(, 1)
Next
With Sheets(1)
For Each a In .Range(.[A1], .[A65536].End(xlUp))
a.Offset(, 3) = d(a.Value)
Next
End With
End With
End Sub

http://forum.twbts.com/viewthread.php?from=notice&tid=2398

或者你可以前往以上的網頁去參考:對初學者 Dictionary 要花一點心思,但是你要的答案就是用 Dictionary 來解決.

V98

帖子: 83
主題: 17
精華: 0
積分: 105
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
註冊時間: 2010-12-28
最後登錄: 2018-8-8

2^#

發表於 2011-1-17 18:47 | 只看該作者

我是用EXCEL2003的