Tcd,pivotfield
Fermé
mia1987
Messages postés
49
Date d'inscription
lundi 4 août 2008
Statut
Membre
Dernière intervention
10 mai 2011
-
13 août 2008 à 16:06
Keiser - 28 août 2008 à 17:45
Keiser - 28 août 2008 à 17:45
A voir également:
- Tcd,pivotfield
- Tcd excel - Guide
- Vba actualiser tous les tcd ✓ - Forum Excel
- Tcd total distinct ne s'affiche pas - Forum Excel
- Tcd calcul entre 2 colonnes ✓ - Forum Excel
- Tri tcd ne fonctionne pas ✓ - Forum Excel
4 réponses
Mia,
l'index correspond au numéro de la feuille, si ton tcd est sur la seconde feuille tu écrit Sheets(2)
ou tu peux utiliser le nom de la feuille sheets("MaFeuille"), choisit la méthode qui te convient le mieux.
a+
l'index correspond au numéro de la feuille, si ton tcd est sur la seconde feuille tu écrit Sheets(2)
ou tu peux utiliser le nom de la feuille sheets("MaFeuille"), choisit la méthode qui te convient le mieux.
a+
Salut mia,
Remplace ActiveSheet par Sheets(index), où index est le numéro d'index ou le nom de la feuille contenant le TCD.
Remplace ActiveSheet par Sheets(index), où index est le numéro d'index ou le nom de la feuille contenant le TCD.
mia1987
Messages postés
49
Date d'inscription
lundi 4 août 2008
Statut
Membre
Dernière intervention
10 mai 2011
25 août 2008 à 10:11
25 août 2008 à 10:11
Merci keiser!
sinn pr l'index, je suis supposée ne pas le connaitre , je sais pas le prog doit normlmt s'appliquer à un fichier qlq..
dc y'a moyen pr remplacer l'index?
sinn pr l'index, je suis supposée ne pas le connaitre , je sais pas le prog doit normlmt s'appliquer à un fichier qlq..
dc y'a moyen pr remplacer l'index?
mia1987
Messages postés
49
Date d'inscription
lundi 4 août 2008
Statut
Membre
Dernière intervention
10 mai 2011
27 août 2008 à 15:24
27 août 2008 à 15:24
Merci Keiser :)
je sais pas pourquoi ça marche pas :s!
sinn, est ce que t'as uen idée sur cmt rendre la macro excecutable? parceque je veux la rendre plus générale,comme ça elle sera plus liée à mn fichier!
merci encore
je sais pas pourquoi ça marche pas :s!
sinn, est ce que t'as uen idée sur cmt rendre la macro excecutable? parceque je veux la rendre plus générale,comme ça elle sera plus liée à mn fichier!
merci encore
Hello mia,
Peut etre l'erreur vient du nom du Tcd, essaye ce code :
j'ai remplacé le nom du Tcd par un numéro d'index, c'est à dire je lui indique de prendre le 1er Tcd dans la feuille active.
With ActiveSheet.PivotTables(1).PivotFields("avec")
.Orientation = xlRowField
.Position = 1
End With
With ActiveSheet.PivotTables(1).PivotFields("sans")
.Orientation = xlDataField
.Position = 1
End With
a+
Peut etre l'erreur vient du nom du Tcd, essaye ce code :
j'ai remplacé le nom du Tcd par un numéro d'index, c'est à dire je lui indique de prendre le 1er Tcd dans la feuille active.
With ActiveSheet.PivotTables(1).PivotFields("avec")
.Orientation = xlRowField
.Position = 1
End With
With ActiveSheet.PivotTables(1).PivotFields("sans")
.Orientation = xlDataField
.Position = 1
End With
a+