excel - 在我的字段“vendor”中隐藏我的数据透视表中包含“JVPDML”一词的行

Question

我有一个数据透视表，我想在名为“供应商”的字段中隐藏所有包含“JVPDLM”一词的供应商……我在下面保存了这个宏，但将来我仍然可以有更多供应商包含这个词“JVPDLM” ”，这就是为什么我在下面的 VBA 代码中的列表并不详尽。在此先感谢您的帮助。哈维

Sub hideJVPDMLcompanycode()
On Error Resume Next
With ActiveSheet.PivotTables("PivotTable2").PivotFields("Vendor")
.PivotItems("JVPDML Espana ").Visible = False
.PivotItems("JVPDML International GmbH ").Visible = False
.PivotItems("JVPDML GmbH ").Visible = False
End With
End Sub

标签： excelvbapivot-table

Answer 1

用于for each检查每个PivotItem包含*JVPDML*模式，这里的例子：

Sub hideJVPDMLcompanycode()
    Dim pItem As PivotItem
    For Each pItem In ActiveSheet.PivotTables("PivotTable2").PivotFields("Vendor").PivotItems
        If UCase(pItem.Value) Like "*JVPDML*" Then pItem.Visible = False
    Next pItem
End Sub

测试：