我有一堆数据,其中包含许多有关流程的信息。例如,我要过滤掉数据中所有的唯一错误代码以及所有唯一的活动。我尝试通过以下例程进行操作。 总体而言,我对结果感到满意,但我的数据的第一项始终是重复的。我在做什么错了?
see what the result looks like
Sub Test()
Dim Rohdaten_rows, Rohdaten_columns As Long
Rohdaten_rows = Worksheets("Test").Cells(1, 1).End(xlDown).Row
Worksheets("Test").Columns("C:Z").EntireColumn.Delete
Worksheets("Test").Cells(1, 4) = "Unique Aktivitäten"
Worksheets("Test").Cells(1, 6) = "Unique BuHi"
Worksheets("Test").Range("A2:A" & Rohdaten_rows).AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Worksheets("Test").Range("D2"), unique:=True
Worksheets("Test").Range("B2:B" & Rohdaten_rows).AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Worksheets("Test").Range("F2"), unique:=True
End Sub