Excel 数据过滤器不显示任何要过滤的内容

我已经将一个查询导入Excel，这是一个非常直接的过程。我遇到的问题是，如果我单击标题行并说filter，如果我选择任何一个过滤器箭头，它们是否没有要过滤的值？我应该更改什么，以便能够过滤列中的值

第1行包含标题，第2行包含数据，但它们是在数据行（即第2行及以后）中返回的一些空白值

下面是一个指向垃圾数据工作簿的链接，其中显示了该问题。

---

数据作为ListObject表导入，并包含一个标题，该标题使用.ListObjects.ShowHeaders=False隐藏。要解决此问题，必须公开标题行，然后将工作表的第1行传输到表的标题行

下面是一些快速代码，用于修复在这种情况下作为表导入的数据

Sub Repair_Import()
    Dim lo As ListObject
    With ActiveSheet
        For Each lo In .ListObjects
            If Not lo.ShowHeaders Then _
                lo.ShowHeaders = True
            If Not IsNumeric(.Cells(2, 1)) Then
                .Rows(1).Copy Destination:=.Cells(2, 1)
                .Rows(1).EntireRow.Delete
            End If
            If Not lo.ShowAutoFilterDropDown Then _
                lo.ShowAutoFilterDropDown = True
        Next lo
    End With
End Sub

选择A2或实际列表对象表中的任何单元格后，大致转换为：

工作台工具► 设计► 表格样式选项► 标题行Alt+JT，O 复制标题标签的第一行。Ctrl+Home，然后Shift+Ctrl+→ 和Ctrl+C。 选择A2并粘贴↓ 然后按Ctrl+V组合键 选择第1行并删除，上移。Ctrl+Home，然后Shift+Spacebar，最后Alt+E，D。 工作台工具► 设计► 表格样式选项► 过滤器按钮Alt+JT，B 依我看，原始数据导入会更好，并允许用户端进行更多的个性化定制。 这确实取决于表格标题的左上角单元格是基于文本的，该列是数字的，但个别情况下应易于进行少量编辑

以隐藏的表格标题行打开

打开数据► 数据工具► Filter显示没有可用于筛选的值

使用上下文菜单表工具► 设计► 表格样式选项► 显示标题行

在运行修复宏之后

值可用于筛选

---

标题行下是否有一个空白的隐藏行？某些行将包含一个空白值。是否所有内容都已填充到a列中，而其余列似乎是由于文本溢出而填充的？如果您选择columnA并运行一个文本到列，您看到其余的数据了吗？@Jeeped-我已经用选项卡浏览了我的工作簿，并验证了数据实际上存在于a-V列无溢出curiouser和curiouser列中。这确实是非常奇怪的行为。您是否可以将仍然显示流氓行为的工作簿的修订副本发布到公共共享，并将URL链接发布回此处？@pnuts-我假设OP希望他/她的原始标题标签横跨第1行，而不是Access表中的标题标签。@pnuts-我的头很痛。我以为我就是这么做的。@pnuts-像这样的导入通常是自动的和重复的。我想提供一些自动修复功能。我想我应该添加一些手动修复说明。它可以正常工作，但当遇到最后一个If时，我得到一个错误，Object不支持其属性或方法。ShowAutoFilterDropDown似乎是罪魁祸首。@JorgeJones-ListObject可以是表以外的其他东西，而您可能有一个不能拥有.ShowAutoFilterDropDown的东西所有物由于导入会自动为表指定一个名称，因此我循环了工作表上的所有ListObjects。很有可能是我换了一个不是桌子的。TBH，不管怎么说，那句台词有点松懈。将其注释掉或完全删除。