Discussion :

[maxtin]

Bonjour,

ce que je veux faire est tres simple, mais je ny arrive pas

jai un pivottable dans ma page courant et je veux le selectionner...

au lieu de "hardcoder" le select comme ceci:

Code :

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

Range("premierecasedupivot").Select

jaimerais que le select se reference au pivottable automatiquement

jessaie ceci :

Code :

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

xlApp.ActiveSheet.Tables(0).Range.Select

mais sans succes

jaimerais aussi savoir comment on recupere la coordonnee retournee lors de cete reference dynamique

merci a lavance

[dadavyvy]

Tu peux choisir dans la liste :

Code :

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

1
2
3
4
5
6
7
8
Dim pt As PivotTable
Set pt = ActiveSheet.PivotTables(1)
pt.DataBodyRange.Select
pt.DataLabelRange.Select
pt.PageRange.Select
pt.PageRangeCells.Select
pt.TableRange1.Select
pt.TableRange2.Select