XL 2010 Copier un tableau croisé dynamique même si celui ci a un nombre de ligne variable

306255 · 6 Mars 2024

Bonjour à tous,

Je souhaite copier un tableau croisé dynamique avec le code suivant mais le nombre de ligne peuvent variées en fonctions des résultats, j'aimerais copier le TCD par son nom (Tableau croisé dynamique1) mais non pas par ses coordonnées ( dans l'exemple A2:G25).

Comment est t il possiblle de modifier le code ci-dessous

Merci d'avance

Sub f()
'
' f Macro
'

'
Sheets("FOCUS").Select
Range("A2:G25").Select
Selection.Copy
Sheets("TOUS").Select
Range("X19").Select
End Sub

chris · 6 Mars 2024

Bonjour

VB:

Sheets("FOCUS").PivotTables("Tableau croisé dynamique1").TableRange2.Copy Destination:=Sheets("TOUS").Range("X19")

306255 · 6 Mars 2024

chris à dit:

Merci j'ai juste une autre demande en fait il ne doit pas être coller en x19 juste garde le "copier en mémoire" et la case x 19 c'est juste pour que la case sélectionné soit x19 après le fonctionnement de la macro

Merci pour tout

chris · 6 Mars 2024

RE
Et bien tu enlèves la destination mais il ne restera pas en mémoire très longtemps...
Un TCD a besoin de son cache donc je ne sais trop ce que tu comptes en faire...

306255 · 6 Mars 2024

chris à dit:
RE
Et bien tu enlèves la destination mais il ne restera pas en mémoire très longtemps...
Un TCD a besoin de son cache donc je ne sait trop ce que tu comptes en faire...

super c est impeccable merci

XL 2010 Copier un tableau croisé dynamique même si celui ci a un nombre de ligne variable

306255

XLDnaute Occasionnel

chris

XLDnaute Barbatruc

306255

XLDnaute Occasionnel

chris

XLDnaute Barbatruc

306255

XLDnaute Occasionnel

Discussions similaires