Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" drücken!

Mobiles Hauptmenü

Wie ein MS Graph Objekt nach Word transferieren?

Begonnen von Kossy, April 12, 2012, 13:47:39

⏪ vorheriges - nächstes ⏩

Kossy

Hallo zusammen !

Kann mir vielelciht jemand von auch sagen, wie es per VBA möglich ist, ein MS Graph Chart 8 von einem Microsoft Access Formular in ein Word Dokument zu bringen?

Ich vermute mal, dass es über die Windowszwischenablage funktionieren muss, sicher bin ich mir da aber nicht. Mein MS Graph Objekt besitzt eine Pivottable Eigenschaft.

Sollte man das nicht transferieren können, besteht evtl. die Option, das Diagramm als eine Art Bildobjekt an ein andere MS Office Programm zu übergeben?

Besten Dank für die Hilfe !!

Grüße
Kossy

Kossy

#1
Ergänzung:

Ich habe hier einen ersten Ansatz, aber leider bekomme ich nicht das Graph Objekt in das Worddokument hinein.

Dim objMsWord                       As New Word.Application
   Dim frmCurrentForm                  As Form
   Dim ctlCurrentControl               As Control
   Dim oleMsGraph                      As Chart
   
   Set frmCurrentForm = Forms!frmTab_Rep
   Set ctlCurrentControl = Forms!frmTab_Rep.oleMSGraphObject
   Set oleMsGraph = Forms!frmTab_Rep.oleMSGraphObject
       
   'oleMsGraph.Copy
   'ctlCurrentControl.SetFocus
   'DoCmd.RunCommand acCmdCopy

   With objMsWord
       .Visible = True
       .Documents.Add
       .Selection.PasteSpecial False, wdPasteOLEObject, wdFloatOverText, False
   End With
   
   Set objMsWord = Nothing


Kann mir hier vielleicht jemand helfen?