使用VBA清除所有切片器时排除多个切片器

Question

我需要清除一组切片器，不包括需要保留的2个切片器。我目前使用的代码允许我从clear中排除1个切片器，但是我找不到排除第二个切片器的正确方法。下面的代码就是我正在使用的代码：

MTALines.__points

有人可以建议如何将其排除在外吗？我试图排除“测量”和“当前与比较”，似乎能够做到一个或另一个！ （新的使用VBA，所以我去学习！）

Answer 1

如果你想从for-loop中排除2个变量这样的样本可以使用：

Sub TestMe()

    Dim bar, foo
    bar = Array(1, 2, 3, 4, 5)

    For Each foo In bar
        If Not (foo = 1) And Not (foo = 2) Then
            Debug.Print foo
        End If
    Next foo

End Sub

它会打印3,4,5，只要1和2被忽略。