Discussion :

[giom182]

Bonjour,

Selon la FAQ bien utile, j'ai créé un TCD par macro, jusque la tout va bien !

Maintenant , je souhaiterai insérer, dans ma commande de TCD, une variable "nomfeuille" car la feuille dans laquelle se trouve mes données sources change (c'est la page active) et par la même occasion, changer la selection (dans l'exemple : SourceData:= [Feuil1!A1:J88]) par une variable de type Integer pour faire varier le 88.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
dim nomfeuille as string
nomfeuille = "Feuil1"
 
ThisWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
    [Feuil1!A1:J88].CurrentRegion.Address(, , xlR1C1, True)).CreatePivotTable _
    TableDestination:="" & nomfeuille & "!R3C12", _
    TableName:="Mon TCD"

Comme vous l'avez lu dans mon code, la variable nomfeuille est déjà dan la table de destination, j'aimerai quelle soit aussi dans la table source (à la place de Feuil1)

Si quelqu'un serait me renseigner, ca serait bien sympa

Merci d'avance pour vos réponses

[aalex_38]

Bonjour,

Un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim source As String
source = "'Feuil1'!A1:J88" 
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
        source).CreatePivotTable TableDestination:= _
'...

[giom182]

C'était si simple !! lol

Merci bien