2021年2月3日 星期三

VBA:移除重複(RemoveDuplicates)

                          

MSDN:RemoveDuplicates 

N = Sheets("SHEET1").Range("A" & "65536").End(xlUp).Row

Dim myRange As Range

 Set myRange = Sheets("SHEET1").Range("A1:o" & N)

 myRange.RemoveDuplicates Columns:=Array(1), Header:=xlYes

設定好儲存格範圍(Set myRange),就可以執行了,另外兩個參數如下:

Columns:Array(1),A到O行的A行當重複判斷基準。

Header:xlYes,有標題

沒有留言:

張貼留言

數字統計:20240223

成交量大  漲幅大 統計: 演算法模擬: