ausgelagert aus VB.NET - Daten an Excel bei geöffneter Datei ~VaporiZed
Guten Morgen.
Vor einiger Zeit habe ich mit einem ähnlichen Code ein kleines Tool für mich programmiert.
Es ging darum, Werte in eine bestehende Excel-Tabelle automatisiert einzutragen. Wegen der Corona-Zeit wurde das Tool gerade für einige Wochen nicht benötigt und somit auch nicht verwendet. Nun scheint das Tool nicht mehr auf die Excel-Datei zugreifen zu können, d.h. das Dokument ist zwar geöffnet, jedoch werden über die nachfolgende For-Each-Schleife keine Workbooks gefunden.
Anbei noch kurz die Version von Excel und den Verweis auf die Interop.
Kann jemand sagen, wo genau der Fehler liegt, dass mein Tool nicht mehr auf die Excel-Instanz zugreifen kann?
Gruss & vielen Dank
ADB
Guten Morgen.
Vor einiger Zeit habe ich mit einem ähnlichen Code ein kleines Tool für mich programmiert.
Es ging darum, Werte in eine bestehende Excel-Tabelle automatisiert einzutragen. Wegen der Corona-Zeit wurde das Tool gerade für einige Wochen nicht benötigt und somit auch nicht verwendet. Nun scheint das Tool nicht mehr auf die Excel-Datei zugreifen zu können, d.h. das Dokument ist zwar geöffnet, jedoch werden über die nachfolgende For-Each-Schleife keine Workbooks gefunden.
Quellcode
- Imports Microsoft.Office.Interop.Excel
- Imports Microsoft.Office.Interop
- Public Class Form1
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim ExcelApp As Application
- ExcelApp = CreateObject("excel.application")
- Dim wb As Excel.Workbook
- ExcelApp = CType(GetObject(, "Excel.Application"), Application)
- For Each w As Workbook In ExcelApp.Workbooks
- MsgBox(w.ToString)
- If w.Name = "Test.xlsx" Then
- wb = w
- wb.Activate()
- End If
- Next
- End Sub
- End Class
Anbei noch kurz die Version von Excel und den Verweis auf die Interop.
Kann jemand sagen, wo genau der Fehler liegt, dass mein Tool nicht mehr auf die Excel-Instanz zugreifen kann?
Gruss & vielen Dank
ADB
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „VaporiZed“ ()