los valore de pivotitems no siempre estan como hacerle para que no marque error
publicado
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
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
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