Tableau croisé dynamique en VBA
Fermé
rikito
Messages postés
5
Date d'inscription
mercredi 6 août 2008
Statut
Membre
Dernière intervention
7 août 2008
-
7 août 2008 à 18:03
rikito - 24 oct. 2008 à 17:59
rikito - 24 oct. 2008 à 17:59
Bonjour,
j'essaie de coder un TCD qui va s'adapter à la volumétrie des données sur excel, grâce à end(wldown). Or, mon code ne marche pas. Vous voyez ce qui cloche à ce niveau-là ?
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"'ts types'!R1C1:R1c1.end(xldown).offset(0,12)").CreatePivotTable TableDestination:= _
"[essaimacrosKPIs.xls]ACFI!R3C1", TableName:="PivotTable1", DefaultVersion _
:=xlPivotTableVersion10
j'essaie de coder un TCD qui va s'adapter à la volumétrie des données sur excel, grâce à end(wldown). Or, mon code ne marche pas. Vous voyez ce qui cloche à ce niveau-là ?
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"'ts types'!R1C1:R1c1.end(xldown).offset(0,12)").CreatePivotTable TableDestination:= _
"[essaimacrosKPIs.xls]ACFI!R3C1", TableName:="PivotTable1", DefaultVersion _
:=xlPivotTableVersion10
A voir également:
- Tableau croisé dynamique en VBA
- Tableau croisé dynamique - Guide
- Exemple tableau croisé dynamique télécharger - Télécharger - Tableur
- Tableau word - Guide
- Tableau ascii - Guide
- Trier tableau excel - Guide
1 réponse
Ce qui cloche, c'est ça :
"'ts types'!R1C1:R1c1.end(xldown).offset(0,12)"
tu met le offset et le end(...) dans une "string", donc ils sont lus tels quels.
a mon avis, utilise une variable annexe 'as range'
set tmp = 'ts types'!R1C1:R1c1.end(xldown).offset(0,12)
puis
tmp.name et tmp.address
ou équivalent.
voilà ce que j'en dit, je sais pas si ça marchera.
Bon courage.
2t
"'ts types'!R1C1:R1c1.end(xldown).offset(0,12)"
tu met le offset et le end(...) dans une "string", donc ils sont lus tels quels.
a mon avis, utilise une variable annexe 'as range'
set tmp = 'ts types'!R1C1:R1c1.end(xldown).offset(0,12)
puis
tmp.name et tmp.address
ou équivalent.
voilà ce que j'en dit, je sais pas si ça marchera.
Bon courage.
2t
24 oct. 2008 à 17:59