XL 2019 Impossible de lire la propriété pivotitems de la classe pivotfield

kira97493 · 19 Août 2021

Bonjour je débute en code, pourriez-vous m'apporter votre aide pour cette erreur que je rencontre ci-dessous lorsque j'arrive sur la partie en gras ?

VB:

Sub AA()
'
' AA Macro
'

'
    With ActiveSheet.PivotTables("Tableau croisé dynamique5").PivotFields("NOM.")
        .PivotItems("").Visible = True
    End With
    Range("I38").Select
    ActiveSheet.PivotTables("Tableau croisé dynamique5").PivotCache.Refresh
    With ActiveSheet.PivotTables("Tableau croisé dynamique5").PivotFields("NOM.")
        .PivotItems("").Visible = False
    End With
    With ActiveSheet.PivotTables("Tableau croisé dynamique4").PivotFields("NOM.")
        [B].PivotItems("").Visible = True[/B]
    End With
    Range("T37").Select
    ActiveSheet.PivotTables("Tableau croisé dynamique4").PivotCache.Refresh
    With ActiveSheet.PivotTables("Tableau croisé dynamique4").PivotFields("NOM.")
        .PivotItems("").Visible = False
    End With
    Range("A1").Select
End Sub

En vous remerciant,

XL 2019 Impossible de lire la propriété pivotitems de la classe pivotfield

kira97493

XLDnaute Nouveau

Discussions similaires