Excel 删除重复问题

我正在尝试使用以下代码删除重复的行：

    Sub removeDuplicates()
'
' Macro7 Macro

'Workbooks("Tester.xlsm").Worksheets(1).Range("A1", Range("F1").End(xlDown)).removeDuplicates Columns:=Array(1, 2), Header:=xlYes
Set Rng = Range("A1", Range("F1").End(xlDown))
    Workbooks("Tester").Worksheets(1).Rng.removeDuplicates Columns:=Array(1, 2), Header:=xlYes

End Sub

然而，它给了我一个运行时1004错误，我做错了什么？有解决办法吗？ 顺便说一句，注释的代码也不起作用，它会返回相同的错误消息。

工作表类不提供Rng属性。似乎您正在尝试重用代码中定义的变量Rng，但直到该行运行完毕，它才被赋值。请改为使用属性：

Set Rng = Workbooks("Tester").Worksheets(1).Range("A1", Workbooks("Tester").Worksheets(1).Range("F1").End(xlDown))
Rng.removeDuplicates Columns:=Array(1, 2), Header:=xlYes

相反，请设置Rng=WorkbooksTester.Worksheets1.RangeA1、WorkbooksTester.Worksheets1.RangeF1.EndxlDown，然后仅设置Rng.removeDuplicates…您必须使用WorkbooksTester.xlsm。