los valore de pivotitems no siempre estan como hacerle para que no marque error

[eolivas]

Tengo una tabla dinámica con una columna que se llama servicio los cuales los nombres de los servicios son A6,50,64,69 como le puedo decir mediante una condición if que si existe el servicio ejecute la instrucción visible false y si no que no lo haga que cheque el otro servicio

 

ActiveSheet.PivotTables("Tabla dinámica4").PivotFields("SERVICIO").CurrentPage _
        = "(All)"
    With ActiveSheet.PivotTables("Tabla dinámica4").PivotFields("SERVICIO")
        .PivotItems("A6").Visible = False
        .PivotItems("50").Visible = False
        .PivotItems("64").Visible = False
        .PivotItems("69").Visible = False
        .PivotItems("(blank)").Visible = False
    End With