Einzelnen Beitrag anzeigen

Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.736 Beiträge
 
Delphi 6 Enterprise
 
#8

AW: Mehrere Excel-Dateien bearbeiten

  Alt 8. Dez 2011, 15:40
Ist den das Frame Objekt von außen nicht erreichbar?
Per VBA in Excel geht sowas (war Neugierig):

Code:
Sub Test()
Dim w As Word.Application
Dim d As Word.Document
Dim f As Word.Frame

    ActiveSheet.ChartObjects("Diagramm 1").Activate
    ActiveChart.ChartArea.Select
    ActiveChart.ChartArea.Copy
       
    Set w = New Word.Application
    w.Visible = True
   
    Set d = w.Documents.Add
    d.Activate
   
    Set f = d.Frames.Add(w.Selection.Range)
    f.Range.Select
   
    w.Selection.PasteSpecial Link:=False, DataType:=wdPasteOLEObject, Placement _
                                    :=wdFloatOverText, DisplayAsIcon:=False
   
    '...
End Sub
Die Grafik wird im Positionsrahmen verankert, ist aber größer als dieser. Mit einfach nur Selection.Paste wird sie als Grafik in den Rahmen gequetscht. Wenn ich mal Zeit hab, probier ich das auch nochmal von Delphi aus.
Ralph
  Mit Zitat antworten Zitat