savoir si le pivot table existe [Résolu]

[amel95140]

Bonjour,

Je voudrais tester si un pivot table existe dans la sheet courante ou pas
pour cela je veux utiliser la condition suivante mais ca ne marche pas

Code :

1
2
if(ActiveSheet.PivotTables("PivotTable" & strNbPT).exists) then
end if

merci d'avance pour votre aide

[SilkyRoad]

bonjour

tu peux aussi tester cette procedure

Code :

1
2
3
4
5
6
Dim Pvt As PivotTable
 
On Error Resume Next
Set Pvt = ActiveSheet.PivotTables("Tableau croisé dynamique1")
If Not Pvt Is Nothing Then MsgBox "Le TCD existe"
On Error GoTo 0

michel

[amel95140]

merci beaucoup de ton aide michel