过滤范围和表格的区别

Question

有人可以解释为什么过滤范围和表格之间存在差异吗？我得到了两者之间的区别，但我不明白为什么范围过滤器在格式化为表格时无法过滤基础数据。

由于差异，我在过滤文件时遇到了问题。我正在合并 x 个具有相同标题的用户文件。但是，有些人（非常感谢，大厅对面的查尔斯）决定将表格格式化为导致问题的表格。

是否有一种通用的方法（或更有效的方法）来过滤独立于格式的数据？例如，我尝试在 Col A 中过滤文本“NORAM”，然后将可见单元格复制/粘贴到其他地方。

我需要这样做吗？

If Range("A1") is range Then
    Filter Range("A1") with range method ("NORAM")
    Copy Visible Cells
    Paste to Destination
Else
    Filter Range("A1") with table method ("NORAM")
    Copy Visible Cells
    Paste to Destination
End If

或者有没有办法做这样的事情，它独立于范围或表格？

Range("A1") filter range regardless of format ("NORAM")
Copy Visible Cells
Paste to Destination

复制或粘贴数据我不需要帮助。以上只是通用步骤。我希望看到过滤范围、表格的最有效方法，并希望有一种过滤两者的方法，而不管格式如何。

Answer 1

我不确定您遇到了什么错误，但这里有一个快速过滤器，已在表格 (Sheet1) 和未格式化为表格的范围 (Sheet2) 上进行了测试。

Option Explicit

Private Sub FilterTableOrRange(ws As Worksheet)
    Dim lastRow As Long, lastCol As Long

    With ws
        lastRow = .Cells(.Rows.Count, 1).End(xlUp).Row
        lastCol = .Cells(1, .Columns.Count).End(xlToLeft).Column

        .Range(.Cells(1, 1), .Cells(lastRow, lastCol)).AutoFilter _
            Field:=1, Criteria1:="NORAM"
    End With
End Sub

Sub Master()
    FilterTableOrRange Sheets("Sheet1")
    FilterTableOrRange Sheets("Sheet2")
End Sub

如果这没有帮助，请具体说明您遇到的问题。