Discussion :

[billy78]

Bonjour à tous,

Pour mon graphique, j'ai besoin des données disponibles dans mon TCD. Avec les mois, le graphique s'allonge. Donc mpour le mois d'octobre, mon graph s'allonge d'un mois par rapport à septembre.
Je voudrais éviter de mettre en dur comme ceci:

Code :

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

1
2
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range("A1:K3"), PlotBy:= _
        xlRows

sachant que K3 est la derniere colonne d'un tableau que j'ai crée à partir de mon TCD, correspondaant au mois d'octobre.

Comment faire pour qu'il dépende automatiquement du dernier mois?
Thank uuuu

[ouskel'n'or]

Dans la FAQ tu as la méthode pour connaître le nombre de lignes d'un TCD. En l'adaptant au nombre de colonnes, tu peux établir ta plage et utiliser celle-ci pour modifier l'adresse de ta source.
En utilisant le code de la FAQ, tu ajoutes

Code :

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

Dim Plage as string, NoCol as byte

et pour fixer la nouvelle plage,

Code :

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

1
2
3
4
NoCol = Pvt.TableRange2.Columns.Count
Plage = Range(Cells(1,1), Cells(3,NoCol)).address
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range(Plage), PlotBy:= _
        xlRows

(Pas testé, jamais fait sur un TCD)
Tu dis
A+

[billy78]

Merci Ouskel'n'or,
mais est ce que je dois au préalable définir "Pvt.TableRange2"? car quand plage et col ne sont affectées à rien du tout quand je copie ton instruction à mon programme. Col =0 et plage=""
Merci

[ouskel'n'or]

En effet, sinon comment utiliser l'instance ? As-tu regardé le code fourni par SilkyRoad, dans la FAQ ? Tu dois utiliser la même syntaxe, déclaration et instance comprises

Code :

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

1
2
3
4
5
6
Sub TaMacro()
    Dim Pvt As PivotTable
 
    'Définit le TCD    
    Set Pvt = Worksheets("Feuil1").PivotTables("Tableau croisé dynamique1")
    '...

Mais est-ce bien ta question ?
A+

[billy78]

En fait non, ce n'est pas la question. J'aurais du mieux m'exprimer. Du TCD, j'ai crée un tableau avec les mois en ordonnées. J'ai des données juskà octobre. et en décembre jaurai des données jusk en nov. Donc la plage de sélection de mes données s'aggrandit au fil du temps! Et c'est depuis ce new tableau que je fais mon graphq.

[ouskel'n'or]

Pour ton graphe, tu utilises bien les données de ton TCD ? Si ton TCD a un mois de plus, il a aussi une colonne de plus ? Le code que t'ai indiqué visait à adapter la plage de données au nouveau TCD. Qu'est-ce que je ne comprends pas ?