Comment vérifier si un tableau croisé dynamique existe dans un classeur ?
S'il y a plusieurs tableaux croisés dynamiques dans votre classeur et que vous souhaitez rapidement savoir si un tableau croisé dynamique spécifique existe dans ce classeur, normalement, vous pourriez aller dans la boîte de dialogue Options du tableau croisé dynamique pour vérifier le nom des tableaux un par un. Mais cela peut être très long et fastidieux lorsqu'il y a des dizaines ou des centaines de tableaux croisés dynamiques. Ici, je peux vous parler d'une astuce pour résoudre cette tâche.
Vérifiez si un tableau croisé dynamique existe dans un classeur avec une fonction définie par l'utilisateur
Pour savoir rapidement si un tableau croisé dynamique existe dans le classeur actuel, vous pouvez créer une fonction définie par l'utilisateur pour résoudre ce problème.
1. Ouvrez le classeur dans lequel vous souhaitez vérifier si le tableau croisé dynamique existe.
2. Maintenez les touches ALT + F11 enfoncées, et la fenêtre Microsoft Visual Basic for Applications s'ouvre.
3. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre Module.
Code VBA : Vérifiez si un tableau croisé dynamique existe dans un classeur
Function PivotExist(Name As String) As Boolean
'Update 20141112
Dim sh As Worksheet
Dim pt As PivotTable
PivotExist = False
For Each sh In ActiveWorkbook.Worksheets
For Each pt In sh.PivotTables
If pt.Name = Name Then
PivotExist = True
Exit For
End If
Next
Next
End Function
4. Ensuite, enregistrez et fermez ce code, revenez à votre feuille de calcul, entrez cette formule =pivotexist("salereport") dans une cellule vide, voir capture d'écran :
Remarques : (1.) Dans la formule ci-dessus, « salereport » est le nom du tableau croisé dynamique que vous souhaitez vérifier.
(2.) Vous devez entrer le nom du tableau croisé dynamique entre guillemets doubles, et le nom doit être sensible à la casse.
5. Après avoir entré la formule, appuyez sur la touche Entrée. Si vous obtenez VRAI dans votre cellule, le tableau croisé dynamique existe ; si vous obtenez FAUX, le tableau croisé dynamique n'existe pas.
Articles connexes :
Comment lister tous les tableaux croisés dynamiques d'un classeur ?
Comment ajouter plusieurs champs dans un tableau croisé dynamique ?
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels