Fehler 0x800AC472 beim Befüllen von Excel

DerBrain · 24. April 2013, 08:45

Ich habe ein Problem mit Excel.
Mein Programm befüllt Excel mit Daten. Dies funktioniert solange, bis der Benutzer auf die Idee kommt (während des Befüllens) Excel anzuklicken. Dann kommt bei dem Zugriff auf eine Zelle (cell.value=wert) die Fehlermeldung 0x800AC742.
In VBA und VB6 konnte man soweit ich weiß, die Zeilen des Exports einfach in ein "on error resume next" packen und das Problem war gelöst. Da VB.net nun aber vernünftiges Fehlerhandling hat, würde ich ganz gern auf dieses on error resume next verzeichten (auch wenn es es wohl noch gibt). Gibt es eine elegantere Version hierfür?

ErfinderDesRades · 24. April 2013, 09:00

programmiere eine ordentliche Befüllung, die nicht rumspinnt, wenn der User aufs Excel klickst.

DerBrain · 24. April 2013, 09:13

Wie?

Mein bisheriger Code sie so aus:

VB.NET-Quellcode

mApp = New Microsoft.Office.Interop.Excel.Application()
mApp.Visible = bVisible
Dim workbook As Microsoft.Office.Interop.Excel.Workbook = mApp.Workbooks.Add()
Dim sheet As Microsoft.Office.Interop.Excel.Worksheet = CType(mSheets.Item("Tabelle1"), Microsoft.Office.Interop.Excel.Worksheet)
For i = 0 To dData.Length - 1
Dim cell As Microsoft.Office.Interop.Excel.Range = CType(oSheet.Cells(1,i), Microsoft.Office.Interop.Excel.Range)
cell.value=dData(i).toString()
Next

ErfinderDesRades · 24. April 2013, 09:27

probierma

VB.NET-Quellcode

mApp = New Excel.Application()
mApp.Visible = bVisible
Dim workbook As Excel.Workbook = mApp.Workbooks.Add()
Dim mSheets = workbook.Sheets
Dim sheet As Excel.Worksheet = CType(mSheets("Tabelle1"), Excel.Worksheet)
For i = 0 To dData.Length - 1
Dim cell As Excel.Range = CType(sheet.Cells(1, i), Excel.Range)
cell.value = dData(i).toString()
Next

DerBrain · 24. April 2013, 09:59

Ich hab jetzt dein Code übernommen.
Musste dafür noch die Microsoft.Office.Interop importieren aber, wie ich schon erwartet habe, hat sich mein Problem dadurch nicht in Luft aufgelöst!
Ich muss zugeben, es wundert mich jedoch auch nicht, da ich (abgesehn von dem Import) keinen wesentlichen Code-Unterschied sehe...

RodFromGermany · 24. April 2013, 10:03

Frag mal alternativ Frau Google nach Fehler 0x800AC472.

DerBrain · 25. April 2013, 10:28

Die Fehlermeldung zu googlen hat nicht wirklich zu nem Ergebnis geführt.
Ich weiß lediglich, dass das Problem auch bei vba Auftritt, da halt als Fehler 2148189298 - was ja aber nichts anderst ist als die Dezimaldarstellung der Hexzahl...

petaod · 25. April 2013, 13:19

Setze (zumindest während des Befüllens) mApp.Visible auf False, dann klickt dir kein User dazwischen.

Zum Thema Fehlerbehandlung: msdn.microsoft.com/de-de/library/ms973849.aspx
Aber bitte auch nur die erwarteten Fehler unbehandelt abfangen.
Du kannst ein Catch auf genau diesen 0x800AC472 setzen.

hal2000 · 27. April 2013, 01:32

Die saubere Variante ist das Implementieren von IMessageFilter. Die lange Begründung steht hier: social.msdn.microsoft.com/foru…c-4535-8d7d-4e374ab8ff09/

Die Dokumentation findet sich hier: msdn.microsoft.com/de-de/libra…s693740%28v=vs.85%29.aspx

Die Fehlermeldung zu googlen hat nicht wirklich zu nem Ergebnis geführt.

Das alles habe ich übrigens durch Suchen im Netz mit dem Suchbegriff "0x800AC472" gefunden.

Fehler 0x800AC472 beim Befüllen von Excel

Fehler 0x800AC472 beim Befüllen von Excel

VB.NET-Quellcode

VB.NET-Quellcode

Tags

Ähnliche Themen

5 Benutzer haben hier geschrieben