【问题标题】:Hide blank or Null Field Options in Pivot Table在数据透视表中隐藏空白或 Null 字段选项
【发布时间】:2022-08-03 00:23:29
【问题描述】:

我正在尝试编辑下面的代码以隐藏字段选项列表中的(空白)值。我想因为我使用的是数据模型,所以我对语法有点困惑。我收到错误消息“无法获取 PivotField 类的 PivotItems 属性”

Sub hi()
 With ActiveSheet.PivotTables(\"PivotTable3\").PivotFields(\"[Range 2].[Goal].[Goal]\")
        .PivotItems(\"(blank)\").visible = False
End With
        
End Sub

  • 那么发生了什么,您是否收到错误,是否没有隐藏...请提供详细信息,以便我们为您提供帮助。
  • 哦,好点!我收到一条错误消息。 - 无法获取 PivotField 类的 PivotItems 属性
  • 所以调试代码,在 ActiveSheet.PivotTables(\"PivotTable3\").PivotFields 上添加一个手表,看看里面有什么。您应该能够在按照描述的方式工作时弄清楚如何进入正确的入口..
  • 我不明白你的意思。

标签: excel vba pivot


【解决方案1】:

我认为您可以通过完全选择数据透视表并尝试从被拉入数据透视表的数据中找到所有空白来解决此问题。

  1. 在工作表中选择包含空白行的列。
  2. 按键盘上的 Ctrl+F 打开“查找和替换”框。
  3. 选择查找选项卡并单击选项以打开高级菜单。不要在“查找内容”框中输入任何内容。
  4. 选中匹配整个单元格内容旁边的框。
  5. 从内部下拉菜单中选择工作表。
  6. 从“查找”下拉菜单中选择“值”。
  7. 单击“查找全部”按钮以获取所选范围内的所有空白单元格。
  8. 按 Ctrl+A 选择所有这些行。
  9. 关闭查找框。
  10. 通过单击右键并选择“删除”选项来删除行。

    我希望这有帮助!您可以查看整篇文章,其中包含有关如何执行此操作的屏幕截图here

【讨论】:

  • 我不明白这如何帮助我更新上面的脚本:(
  • 这可能对一个小脚本有帮助。
  • 这应该是一个小脚本或类似的东西。
【解决方案2】:

我可以建议添加一个切片器,其中默认视图可能是空白值的未选择选项。

Dim slcCache as SlicerCache    '' Object to manipulate the slicer
Set slcCache = ActiveWorkbook.SlicerCaches("SlicerName") '' Assign object

With slcCache
    .ClearManualFilter
    .SlicerItems("(blank)").Selected = False '' False value to unselect
'' I do not remember if this is the actual name for an empty value, 
'' but you could find it or replace it by the index that should be 1
End with

【讨论】:

    猜你喜欢
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2014-11-06
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    相关资源
    最近更新 更多