Exporter un graphique Excel vers Word

Résolu
Figat -  
 Tirlibibi -
Bonjour,

Comment exporter un graphique Excel vers Word? (version 2007)

Merci par avance.

4 réponses

  1.
    Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 784
     
    Bonjour,

    Peut-être simplement :
    - copier (dans Excel), coller (dans Word) ou encore,
    - copier, collage spécial, coller avec liaison
    4
  2. Mytå Messages postés 4246 Date d'inscription   Statut Contributeur Dernière intervention   958
     
    Salut le forum

    Tu veux le faire avec une macro . . . 

    Sub exportword()
    Dim Graph As ChartObject
    Set wo = CreateObject("Word.Application")
    doc = wo.documents.Add
    For Each Graph In Sheets("Graphes").ChartObjects
    Graph.Activate
    ActiveChart.CopyPicture Appearance:=xlPrinter, Size:=xlPrinter, Format:=xlPicture
    wo.Selection.Paste
    wo.Selection.typetext Text:=vbCrLf & vbCrLf & vbCrLf & vbCrLf & vbCrLf & vbCrLf
    Graph.Delete
    Next Graph
    wo.activedocument.SaveAs Filename:="NouveauFichier.doc"
    wo.activedocument.Close
End Sub

    Mytå
    2
  4. Tirlibibi
     
    Bonjour merci pour ce super tuto,

    Malheureusement, je vais compliquer légèrement le problème. Le code ci-dessus ne permet de copier qu'un graphique, comment fait-on quand on veut copier tous les graphiques de la feuille excel ?
    0