> Bonjour,
> J'ai un document comportant plusieurs onglets avec environ 60 TCD dont la
> source de donnᅵes est dans un onglet.
> Comment dois je faire pour changer la source de donnᅵes de tous les tableaux
> en meme temps ? Existe t'il une macro ?
> Merci ᅵ ceux qui pourront m'aider
Cette macro suppose que tous les TDC �manent de la m�me
source de donn�es (plage de cellules). Tu dois adapter le nom
de la feuille dans la proc�dure et de l'adresse de la nouvelle
plage de donn�es.
Les pivottables affichent les donn�es contenues dans un pivotcache
Il faut modifier la source des donn�es des PivotCaches, et tous les
PivotTables associ�s � ce pivotcache vont se mettre � jour...
'----------------------------------------
Sub Test()
Dim PC As PivotCache, Adr As String
With ThisWorkbook
With .Worksheets("Feuil1") 'Nom de la feuille � adapter
Adr = Feuil1.Name & "!" & Feuil1.Range("A1:C8").Address
End With
For Each PC In .PivotCaches
PC.SourceData = Adr
PC.Refresh
Next
End With
End Sub
'----------------------------------------
--
MichD
--------------------------------------------
"tbtor" <tb...@domain-xyz.in> a �crit dans le message de groupe de discussion : sdmdnV7S7ff...@giganews.com...