Passer une variable dans: ActiveWorkbook.PivotCaches.Create

Bonjour,

Mon programme fonctionne bien, mais il n'est pas si bien conçu.
Je résume, j'ai un tableau dynamique, qui pointe sur une feuille, qui avec le temps s’agrandit, et pour moi l'idée serait de récupérer la var qui contient le nombre de ligne en cours et de la passer dans ce bout de code, ici: BASE!R1C1:R8000C8 , mais ce n'est pas possible...

Code:

---

1 2 3 4

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ "BASE!R1C1:R8000C8", Version:=xlPivotTableVersion14).CreatePivotTable _ TableDestination:="Feuil1!R3C1", TableName:="Tableau croisé dynamique1", _ DefaultVersion:=xlPivotTableVersion14

---

Dans mon cas, lorsqu'il plante, j'augmente la valeur: 8500, 9000 etc.

Est-ce qu'il y a un moyen, utilisation d'un objet, vu que le PivotCaches est assez barbare!

Bonne journée à vous.

Alex

Code:

---

"BASE!R1C1:R" & var & "C8"

---

Bonjour,

Pour insérer ta variable tu peux utiliser l'opérateur de concaténation:

Code:

---

1 2	SourceData:= _ "BASE!R1C1:R" & nb_ligne & "C8"

---

Cependant je t'invite a te renseigner sur l'objet tableau d'Excel (sous 2010 onglet accueil -> mettre sous forme de table), qui a de nombreux avantages, dont le fait de ne pas avoir a recalculer le nombre de lignes quand tu t'en sert comme source d'un TCD, pour plus d'info il me semble qu'il existe un excellent tuto sur le forum qui traite ce sujet (je mettrais le lien si je le retrouve)

edit: le tuto: https://fauconnier.developpez.com/tu...ux-structures/

Génial et LOL, la concaténation, je suis passé à côté de ça :D

merci pour vos réponses et je vais lire le tuto ;)

A bientôt