High-Tech
Santé-Médecine
Droit-Finances
CodeS-SourceS
Inscription
Plan
Connexion
Rechercher un code, un tuto, une réponse
Accueil
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Tous les langages
Delphi / Pascal
Java
Python
SQL
RegEx
Flash
ASM
IRC
Graphisme
PDA
ColdFusion
Foxpro
Flex
Visual Basic / VB.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
PHP
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C/C++/C++.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Javascript
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C#/.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
ASP/ASP.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Accueil
Connexion
Déposer un code
Code
Recherche
Haut
Accueil
Forum Codes-Sources
Visual Basic
Sujet Précédent
Sujet Suivant
PIVOTTABLE
slimanov
Messages postés
30
Date d'inscription
mercredi 9 avril 2003
Statut
Membre
Dernière intervention
13 juin 2006
- 2 févr. 2006 à 21:02
cs_lhia
Messages postés
1
Date d'inscription
jeudi 13 février 2003
Statut
Membre
Dernière intervention
1 juillet 2008
-
1 juil. 2008 à 14:54
raf
comment acceder a une cellule précise dans un tabeau dynamique croisé ( PIVOTTABLE)
Afficher la suite
A voir également:
PIVOTTABLE
Impossible de lire la propriété pivottables de la classe worksheet
✓
-
Forum - VB.NET
Filtre PivotTable
✓
-
Forum - Visual Basic 6
Message d'erreur
-
Forum - Visual Basic 6
Visual Basic : "erreur d'exécution '1004': Impossible de lire la propriété Search de la classe
-
Forum - Visual Basic
1
réponse
Réponse 1 / 1
cs_lhia
Messages postés
1
Date d'inscription
jeudi 13 février 2003
Statut
Membre
Dernière intervention
1 juillet 2008
1 juil. 2008 à 14:54
Dim pvt As PivotTable
Dim feuille As Worksheet
Set feuille = Application.Sheets("nom_feuille")
Set pvt = feuille.PivotTables("nom_TCD")
MsgBox(pvt.GetData("'nom_champ' 'nom_ligne1' 'val_ligne1' 'nom_ligne2' 'val_ligne2' 'nom_colonne1' 'val_colonne1' 'nom_colonne2' 'val_colonne2' "))
Exemple :
Dim pvt As PivotTable
Dim feuille As Worksheet
Set feuille = Application.Sheets("nom_feuille")
Set pvt = feuille.PivotTables("nom_TCD")
MsgBox(pvt.GetData("'Prix' 'Marque' marque1' 'Produit' 'produit2' 'Pays' 'France' 'Année' '2008'"))
Ceci va afficher 28
Les tops du mois
Affichage en tableau : afficher des données dans un tableau
Swing - Partie 2 : ActionListener, Listener, JButton
Exemple de création d'un script d'authentification
Rendre le javascript dynamique par apport à une base de données
La commande "shutdown"