Guten Tag,
ich erzeuge aus Excel mehrere Word-Dateien. Also ich füge aus Excel Grafiken in eine Word-Datei ein. Danach speichere ich die Word-Datei, öffnere eine neue Word-Datei, füge wieder Grafiken ein usw. In der 1. Datei läuft das problemlos durch, bei der 2. Datei bekomme ich beim Formatieren der Grafik den Laufzeitfehler 462 „Der Remote-Server-Computer existiert nicht oder ist nicht verfügbar“. Der Fehler scheint nur bei Office 2002 aufzutreten.
Hier der Code:
Sheets(„Test“).Select
ActiveChart.ChartArea.Select
ActiveChart.ChartArea.Copy
wrd.ActiveDocument.Bookmarks(„Grafik“).Select
wrd.Selection.Find.ClearFormatting
If GrafikOptEinfuegen = „Link“ Then
wrd.Selection.PasteAndFormat (wdChartLinked)
ElseIf GrafikOptEinfuegen = „Grafik“ Then
wrd.Selection.PasteAndFormat (wdChartPicture)
Else
wrd.Selection.PasteAndFormat (wdChart)
End If
wrd.Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
wrd.Selection.InlineShapes(1).Width = CentimetersToPoints(TmpBreite)
wrd.Selection.InlineShapes(1).Height = CentimetersToPoints(TmpHoehe)
bei wrd.Selection.InlineShapes(1).Width = kommt der Fehler, aber erst bei der 2. Datei und nur bei Excel/Word 2002; bei 2003 läuft es durch.
Hat jemand eine Idee, woran das liegen kann?