excel - 无法在 Excel vba 宏中指定确切范围

Question

今天是我在 Excel 中与 VBA 宏作斗争的第一天。我要做的就是指定一个列，从中获取不同的值并将它们复制到另一列中，在不同的工作表上找到。我读了很多书，这就是我想出的:

Sub TestS()
    Dim lastRow As Long
    lastRow = Worksheets(3).Range("A" & Rows.count).End(xlUp).Row
    Worksheets(3).Range(Cells(3, 1), Cells(lastRow, 1)).AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Worksheets(2).Range("A3"), Unique:=True
End Sub

lastRow 当前指向正确的位置，但出现错误:

Run-time error 1004 The extract range has a missing or invalid field name.

显然语法有问题，但我尝试了许多不同的方法，但都没有奏效。

Answer 1

只需符合条件 细胞():

Sub TestS()
    Dim lastRow As Long
    With Worksheets(3)
        lastRow = .Range("A" & Rows.Count).End(xlUp).Row
        .Range(.Cells(1, 1), .Cells(lastRow, 1)).AdvancedFilter _
            Action:=xlFilterCopy, _
            CopyToRange:=Worksheets(2).Range("A3"), Unique:=True
    End With
End Sub