2013-06-01 59 views
1

我想清除重複內容而不是刪除整行。我試圖從堆棧溢出刪除行宏,但我無法正確編碼。在哪裏我發現刪除行我改變,以清除內容。以下是我的例子。我正在尋找一些vba代碼。我想清除重複的單元格值

      **Before** 

44451 NEW YORK MY NAME 123456789 216611 1989年1月11日1
44451 NEW YORK MY NAME 123456789 216611 1989年1月11日1
44452 LONDON YOUR NAME 987654321 216612 1938年9月8日1
44453 NEVADA其他產品名稱654321 216613 2008年3月18日1
44453 NEVADA OTHERS NAME 654321 216613 2008年3月18日1

      **After** 

44451 NEW YORK MY NAME 123456789 216611 1989年1月11日1
44452 LONDON YOUR NAME 987654321 216612 1938年9月8日1
44453 NEVADA OTHERS NAME 654321 216613 2008年3月18日1

+2

你能解釋一下好嗎?,爲什麼你從第二排保持216611,並保持其餘的?爲什麼它與第3行結合?爲什麼當它只出現一次時重複216612?你爲什麼不重複216613?舉一個你想要的東西的更好的例子,因爲你給我們的東西是根據內容做了不同的事情,再加上你對問題的解釋很差,即使它不起作用也給我們你的代碼,不要指望人們爲你做代碼,如果你想聘請專業人士! – Newbie

回答

0

嘗試以下代碼

Sub sample() 
    Range("A1").CurrentRegion.RemoveDuplicates Columns:=Array(1, 2, 3, 4, 5), Header:=xlNo 
End Sub 

enter image description here

+0

@Yogi這個解決方案是否適合你?如果是,請接受答案。 – Santosh