刪除動態行和列範圍中的重複項

下面是我記錄在Excel中示例宏，我有工作：

Sub Macro1() 
' 
' Macro1 Macro 
' 

' 
Cells.Select 
ActiveSheet.Range("$A$1:$C$87").RemoveDuplicates Columns:=Array(1, 2, 3), _ 
Header:=xlNo 
End Sub

如何編輯這允許不同的行和列數？

來源

2011-10-31 user955289

只需使用：

ActiveSheet.Columns(1).Resize(, 3).RemoveDuplicates Columns:=Array(1, 2, 3), Header:=xlNo

或者

ActiveSheet.UsedRange.RemoveDuplicates Columns:=Array(1, 2, 3), Header:=xlNo

來源

2011-10-31 22:21:54 Reafidy

第二個工作很好。謝謝！ – user955289

不知道你的數據是如何組織的事情：

ActiveSheet.Range("A1").CurrentRegion.RemoveDuplicates _ 
         Columns:=Array(1, 2, 3), _ Header:=xlNo

來源

2011-10-31 20:33:37

很抱歉的模糊崗位。我應該包含哪些信息？ – user955289

你可以添加一些東西，概述「動態」的含義。不同行數的要求是非常簡單的，但對於不同的列要少一些。 –

我想允許不同的行數和列數。 – user955289

刪除動態行和列範圍中的重複項

回答

相關問題