1樓：匿名使用者
樓主，我回答過跟您問題相類似的刪除重複行的例子，現將vba**再發過來，您只需要按一個鍵，所有重複的就會被清掉。
dim i as long
dim j as long
dim k as long
dim c as integer
k = range("a65536").end(xlup).row
i = 2
do while i <= k
for j = 1 to i - 1
c = 0
if cells(i, 1).value = cells(j, 1).value then
c = c + 1
end if
if cells(i, 2).value = cells(j, 2).value then
c = c + 1
end if
if cells(i, 3).value = cells(j, 3).value then
c = c + 1
end if
if cells(i, 4).value = cells(j, 4).value then
c = c + 1
end if
if cells(i, 5).value = cells(j, 5).value then
c = c + 1
end if
if c = 5 then
activesheet.rows(i).entirerow.delete
i = i - 1
k = k - 1
exit for
end if
next j
i = i + 1
loop
以上**，是檢查abcde五列每一行的值，所有第二個完全相同的就會被刪除.
上述**使用方法如下:
錄製巨集:選單"工具"->巨集->錄製巨集)--> "巨集名"處給巨集取名字->設定快捷鍵,"快捷鍵"下面輸入一個字母-->確定後開始錄製巨集。
編輯巨集:開始錄製後即可直接按停止鍵, 然後編輯巨集(工具->巨集->巨集(m)->選擇剛建那個巨集->點右邊的"編輯"按鈕-->進入巨集編輯介面-->刪除sub *** 至 end sub之間所有內容-->然後貼上上述程式**-->按工具欄上的"儲存"按鈕-->"檔案"選單-->關閉並反回micorsoft excel
執行巨集: 按剛剛設定的快捷鍵(ctrl+那個字母), 或者通過選單"工具"-->巨集-->巨集(m)-->視窗上選巨集名, 按"執行"按鈕執行巨集.
樓主，如果仍有關於這段**的使用問題，請hi我。
2樓：匿名使用者
第一步：對姓名一項 進行高階篩選
選中姓名列 －－資料－－篩選 －－高階篩選－－選擇不 重複的記錄－－ 複製到 另一** a列(假設原表sheet1,姓名在a列 資料在a:l列 ，新表sheet2）
第二步： vlookup函式
在 sheet2 b1輸入
=vlookup(a1,sheet1!$a:$m,column(),false)
滑鼠移到b1 右下角 變成實心十字時 右拉， 然後下拉
只會為你保留一個 ，決不重複
如果你的關鍵字 是企業， 那麼請將 企業放在a列（ sheet1和sheet2都放在a列）
或者 一步 最最簡單的：
選中全部－－－資料－－篩選－－高階篩選－－－選擇不重複的記錄－－複製到 另外一個**
3樓：雙木阿林
excel如何刪除重複內容？很簡單，讓我來教會你！
4樓：匿名使用者
如果是2010版的話，可以用“資料 - 刪除重複項”功能：
5樓：匿名使用者
excel2007有刪除重複項功能,2003可以用高階篩選--選擇不重複和記錄.
6樓：匿名使用者
可能這樣處理:
第一列收信人,第二列地址
增加第三列填上數字(用ctrl下拉填一樣的)然後進行分類彙總,再過濾把彙總的結果行複製出來
7樓：歸浦秋梵
1樓這個是針對所有欄位重複的情況
1、你可以新建一個欄位，然後這個欄位=收信人&地址欄位2、然後根據新建的欄位排序
3、再新建一個欄位，比如c列,=c1=c24,篩選c1，1的都是重複的
8樓：匿名使用者
你試一下用輔助列，可能要用兩個輔助列，第一個輔助列公式：=countif($a$1:a1,a1) 這個公式中，a1是其中第一個收信人或地址，意思是統計這個區域中有多少個a1，通過下拉複製公式，凡是重複的收信人統計出來的值都大於1，用這個判斷是否重複，就可以用篩選大於1的刪除重複行了；然後第二個地址也是一樣的操作，看這樣合適你的要求嗎？
不是一個個複製，你下拉的時候就整列複製了，然後隨著你拉動的過程a1會變成a2，不過由於$a$1是絕對引用，隨著區域的擴大，重複項的累計就會變成2，3，你先試一下看！
9樓：西門無刀
我幫你解釋一下吧，用xiworld 的方法部分可以的，首選增加輔助列=countif($a$1:a1,a1) ，用以判斷**中有多少重複值，比如你說的企業的地址，如果有重複的，輔助列返回的數字是大於1的，全部判斷完畢後，輔助列就顯示瞭如1、2、3、1、1……資料，這些資料如果是1就表明是唯一的，如果大於1，說明是有重複的，然後你用自動篩選，以輔助列為基準，將大於2的全部選出來，當然，不能全部刪除，全部刪除的話你不是連一條都沒了嗎？所以，輔助列是2的你刪除1行，是3的你刪除2行……這樣就行了吧？
excel中的函式只有返回，沒有自動刪除的功能，想自動刪除你就死心吧。通過這些步驟已經幫你提高了不少效率了
10樓：
最簡單的方法：
假設a列是企業名稱、b列是企業地址、c列是收件人，第1行是標題行。
首先你對整張表按地址、同時按收件人排序（升降都可）；
然後在空白處某列如d列第d3單元格設定公式：=if(or(b3=b2,c3=c2),1,"")
如果有可能地址相同但企業名稱不同或企業名稱相同但地址不同而收件人相同則公式為：=if(or(and(a3=a2,b3=b2),and(a3=a2,c3=c2)),1,"")
設好公式後把公式拉到最底一行。
選中a列到d列，設定自動篩選，把d列是1的篩選出來，拖選篩選出來的行右鍵刪除！
不是就搞定了嗎？
你也可以拖選要刪除的內容，點delete鍵刪除內容保留其他列的內容。怎麼刪就隨你啦~
如果你想把刪除後的內容恢復原來的順序，只需要事先加一列序號，刪完後再用序號排序就可以，夠詳細吧，夠簡單吧？呵呵
11樓：匿名使用者
例如收信人和地址在ab列
選中ab列,資料-篩選-高階篩選
注意是選中ab列篩選,不要擴充套件資料區域
勾選,選擇不重複的記錄.
然後把篩選結果複製到新的表中.
剛看到"收信人或地址,只要有一個是重複的就刪除重複的,保留一項! ",你意思是說"相同的地址但不同的收信人"也要刪除一個?你的要求有點自相矛盾啊
實在不行,hi我吧
子易空間站 - excel培訓專家
如何在excel同一列中刪除 相同的字？
12樓：匿名使用者
給樓主一個簡單的吧，選中那一列，ctrl+f，把“其它備註”替換，替換的內容為空白，全部替換，就可以了。如圖所示。
13樓：曙光歐巴
如果出現格式相同比如， 張三（你好他好）一列都是這個樣式，這個時候你想去除一列得括號裡面得文字（你好他好或者別的文字得時候）這種替換得時候上面選擇(*) 下面換成想替換得內容就行了
14樓：匿名使用者
選中該列---資料--刪除重複項，即可。彈出對話方塊，要是刪除重複單元格所在的整個行，則選擴張區域，否則，選當前區域。
excel裡一列數字中，如何將多餘的相同數字消除，只保留
if countif a1 a 100,f1 1,f1,下拉複製公式 再複製這一列得出的值 右鍵選擇性貼上 數值 刪去a列,再進行排序,讓空單元格在下方 選中a列，格式 條件格式 輸入 a2 a1，字型 顏色 選 白色 確定 儘管多餘的沒被刪除，但是已經很明顯了。如果不滿意，可以用高階篩選 選中包括...
怎麼把刪除的資訊復原，如何恢復刪除的資訊內容？
怎麼把刪除的資訊復原隨著我們接收簡訊數量越來越多，一些人為定期對於一些無用的簡訊進行刪除，但是不小心刪除對自己有用的簡訊，要怎麼恢復？簡訊刪除了怎麼恢復。首先開啟手機上的手機資料恢復精靈。選擇簡訊恢復，等待手機掃描。掃描完成以後，誤刪的簡訊就恢復了。刪除的簡訊越早恢復越好，因為時間越長，恢復就變得越...
剪貼簿裡的內容如何刪除，手機剪貼簿裡面的內容怎麼刪
看你的描述應該是中毒了，你可以參照這個文章裡面的方法手工查詢一下病毒，用防毒軟體查殺一下,但是要想恢復被破壞的檔案是不可能了 據金山毒霸反病毒工程師分析，這是一個通過郵件和本機資料夾複製傳播的惡性蠕蟲病毒。病毒在每月28號時會影響系統的剪貼簿工作，導致使用者複製任何文字後，再貼上都會出現 hello...