【Excel VBA】移除重複資料

VBA移除重複資料

Excel有個實用的功能,可以把重複的資料快速移除,那要怎麼使用VBA移除重複」呢?
如將以下重複的姓名移除。

輸入巨集

※輸入以下指令※

Sub 移除重複資料()
Range(“A1”).CurrentRegion.RemoveDuplicates _
Columns:=1, Header:=xlYes
End Sub

語法說明

Range(“A1”).CurrentRegion
選取「A1儲存格」向右與向下到空白欄與空白列邊界的範圍,也就是「選取目前區域儲存格
RemoveDuplicates Columns:=1
針對第1欄重複資料進行移除
Header:=xlYes
是否包含標題列為「xlNO」(預設值);為「xlYes

執行巨集

點選「開發人員」-「巨集」或按下「Ctrl」+「F8」快捷鍵,並「執行」巨集。

執行後則針對第1欄重複資料進行移除,即將姓名重複之資料移除

移除其他欄

※輸入以下指令※

Sub 移除重複資料()
Range(“A1”).CurrentRegion.RemoveDuplicates _
Columns:=3, Header:=xlYes
End Sub

將「Columns」改成3,則針對第「3」欄重複資料進行移除,即將捐血日期重複之資料移除

其他文章分享

【Excel VBA】
批次刪除所有錯誤值

發佈留言

發佈留言必須填寫的電子郵件地址不會公開。 必填欄位標示為 *