Petit problème avec VBA sous excel 2000

[invite663a55a4]

Bonjour messieurs,

Je dois actuellement mettre en place sous excel 2000 une macro pour extraire d'un classeur A des données d'un tableau (Actions en 2012) et les transférer vers un classeur B. Ensuite de ce classeur B, doit se créer automatiquement un tableau croisé dynamique avec bien-entendu son Graph (sur la même page).
Tout ça juste en cliquant sur un bouton de commande visible sur le premier classeur.

Comment faire?

PS: Ensuite il faut que ce bouton puisse extraire avec le même principe des données mais concernant l'année 2013, 2014 ainsi de suite..

Je vous en supplie venez me sauver...

Toinou33130
-----

[invite9df6b9c3]

Bonjour

Voici un code qui pourrait t'aider :

Private Sub CommandButton1_Click()

    Range("A1:B15").Copy
    Workbooks.Add
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Charts.Add
    ActiveChart.ChartType = xlLineMarkers
    ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range("B1:B15"), PlotBy _
        :=xlColumns
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Feuil1"
    With ActiveChart
        .HasTitle = False
        .Axes(xlCategory, xlPrimary).HasTitle = False
        .Axes(xlValue, xlPrimary).HasTitle = False
    End With

End Sub

Ce code copie les valeur entre A1 et B15 du premier classeur et les copie dans un second classeur et crée un graphique en fonction des valeurs.

Par contre, tu veux un tableau croisé dynamique (ce qui est le cas) mais simplement avec les valeurs du second classeur.


Bonne continuation

[invite663a55a4]

Merci beaucoup