vba将选择不在普通文本中

Question

我知道如何构建一个循环宏来读取某一列中的所有行，但是我不知道该怎么做是以这样的方式编写它，它将选择不常见的数据，这可能是这听起来不太正确，所以这是一个例子：

column A
1
1
1
1
2
2
2
2
3
3
3

我想要的是循环查看A列，但只查看新数据的第一行，所以它看起来像这样

Column A
1
2
3

谢谢，

Answer 1

尝试一下：

Sub Macro1()
    Dim A As Range
    Set A = Range(Range("A1"), Range("A" & Cells(Rows.Count, "A").End(xlUp).Row))
    A.RemoveDuplicates Columns:=1, Header:=xlNo
End Sub

修改＃1：

这将首先复制到另一个工作表，然后删除副本中的重复项：

Sub Macro1()
    Dim A As Range, B As Range
    Set A = Range(Range("A1"), Range("A" & Cells(Rows.Count, "A").End(xlUp).Row))
    Set B = Sheets("Sheet2").Range("A1:A" & A.Rows.Count)
    A.Copy B
    B.RemoveDuplicates Columns:=1, Header:=xlNo
End Sub