过滤数据后VBA停止运行，但没有错误消息

Question

我正在尝试使用高级过滤器过滤数据，然后将可见单元格复制到工作簿中的单独工作表：

Dim S_ALR, OUTPUTS, INPUTS As Worksheet
Set S_ALR = ActiveWorkbook.Sheets("S_ALR_87012357")
Set OUTPUTS = ActiveWorkbook.Worksheets("OUTPUTS")

'clear data
Worksheets("OUTPUTS").Range("A:AK").ClearContents

'copy Outputs from S_ALR_87012357 to OUTPUTS tab

S_ALR.Range("A:AK").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
    Sheets("FILTERS").Range("A3:B9"), Unique:=False
S_ALR.Range("A:AK").SpecialCells(xlCellTypeVisible).Copy
OUTPUTS.Cells(1, 1).PasteSpecial

但是，在过滤数据后，宏停止，没有错误消息。

我已经注释掉过滤器并运行了宏和＆amp;其余的代码正常工作。我还尝试通过将CopyToRange放入过滤器中将复制/过去合并到过滤器本身，但这也没有用。

我对此很陌生，所以这可能是我想念的简单事情，但我绝对难过！ 请帮忙。