工作表名称中的数字为“任意数字”

I have this code:

我有这个代码:

Set wb2 = ActiveWorkbook
wb2.Worksheets("-Incumbents").Range("B2:C2", Range("B2:C2").End(xlDown)).RemoveDuplicates Columns:=Array(1, 2), Header _
:=xlYes
wb2.Worksheets("-Incumbents").Range("B2:C2", Range("B2:C2").End(xlDown)).Select
Selection.Copy
Set wb2 = ActiveW