Discussion :

[Australia]

Bonjour à tous, ca faisait bien longtemps que je n'avais pas mis le nez dans cette section

Bon,
mon problème est simple à expliquer,
j'ai un document word "template" dans lequel j'ai des graphiques que je souhaite mettre à jour depuis Word en VBA sous 2007,

ben j'y arrive pas, impossible de sélectionner un graph en VBA dans 2007 ?

pensez vous que ce soit possible ?

j'arrive à accéder au Shape qui contient le graph mais après aucune méthode/propriété dispo pour accéder au graph/chart

Merci d'avance

[Heureux-oli]

Salut,

Le graph est issu de quelle application ?

[Australia]

Word -> insérer Graphique

[Australia]

Bon, j'ai trouvé la réponse à la question que j'ai posée mais qui était incomplète,
voici la réponse correspondante à la question que j'ai posé :

Code :

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

1
2
3
4
5
6
7
8
9
Dim myIls As InlineShape
   Dim wb As Excel.Workbook
 
   For Each myIls In ThisDocument.InlineShapes
      Set wb = myIls.Chart.ChartData.Workbook
      Debug.Print wb.Worksheets(1).Cells(1, 2).Value
      wb.Worksheets(1).Cells(1, 2).Value = "Strasbourg"
      wb.Close
   Next

on modifie les valeurs facilement à partir de wb qui correspond à la feuille Excel des données du graph

Donc voici le vrai code qui marche (désolé pour les modérateurs de pourrir le forum ) :

Code :

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

1
2
3
4
5
6
7
8
9
Dim myIls As InlineShape
   Dim wb As Excel.Workbook
 
   For Each myIls In ThisDocument.InlineShapes
      myIls.Chart.ChartData.Activate
      Set wb = myIls.Chart.ChartData.Workbook
      MsgBox wb.Worksheets(1).Cells(1, 2).Value
      wb.Close
   Next