[VB.NET] Export nach Excel Problem Verfasst am: 30.04.2009, 15:50
Hallo,
seit dem Wechsel von VB6 nach VB 2008 streikt die Excel-Anbindung.
Definiert wurde:
Public XL As Object 'Excel-Application-Objekt
Public BK As Object 'Excel Workbook-Objekt
Public ST As Object 'Excel Worksheet-Objekt
Code:
'Prozedur 1 zum Starten von Excel:
Sub Excel_Start1()
'überprüfen, ob eine Kopie von Microsoft Excel bereits ausgeführt wird
Call DetectExcel()
'Objektvariable so festlegen, daß sie auf die gewünschte Applikation verweist:
XL = CreateObject("Excel.Application") 'Excel-Applikation starten
'Objektvariable so festlegen, daß sie auf die gewünschte Datei verweist:
'Set BK = XL.Workbooks.Add
BK = GetObject(StdPath & "template\PhaseLine.xlt")
'Objektvariable so festlegen, daß sie auf die gewünschte Worksheet verweist:
ST = BK.Worksheets(1)
XL.Application.Visible = True
XL.Parent.Windows(1).Visible = True
End Sub
Die letzte Zeile (XL.Parent.Windows(1).Visible = True) wirft mir ein
System.Runtime.InteropServices.COMException wurde nicht behandelt.
ErrorCode=-2147352565
Message="Invalid index. (Exception from HRESULT: 0x8002000B (DISP_E_BADINDEX))"
Registrieren
Login
