通过Excel宏中的筛选器删除重复项时出错

Question

当我在A栏中指定了值时，我试图删除重复的数据行。

$result = array_merge($array1['group']['subgroup']['items'], $array2);

代码在 Dim lr As Long lr = Cells(Rows.Count, 1).End(xlUp).Row Dim dRange As Range Set dRange = Range("A2:P" & lr) ActiveSheet.AutoFilterMode = False Dim fRange As Range With dRange .AutoFilter Field:=1, Criteria1:="BEAM LENGTH" Set fRange = .SpecialCells(xlCellTypeVisible) ActiveSheet.AutoFilterMode = False End With Range(fRange).RemoveDuplicates Columns:=Array(1, 3, 7, 8, 9) 中出现Range(fRange).RemoveDuplicates Columns:=Array(1, 3, 7, 8, 9)错误。我很好奇为什么Method 'Range' of object'_Global'failed不是fRange对象的可接受值，因为我认为这是带来错误的原因。

任何帮助都将不胜感激。

Answer 1

已经在一个范围内的frange。尝试

fRange.RemoveDuplicates Columns:=Array(1, 3, 7, 8, 9)