Office: (Office 2010) Excel-Datei wird durch VBA beschädigt

Hallo,

ich programmiere mit VBA in Excel. Wenn ich nun mit VBA Daten in eine Datei schreibe und diese schließe, wird diese beschädigt. Beim Öffnen der Datei kommt folgende Fehlermeldung:

"Von Excel wurde unlesbarer Inhalt in Dateiname gefunden. Möchten Sie den Inhalt dieser datei wiederherstellen? Wenn Sie der Quelle dieser Arbeitsmappe vertrauen, klicken Sie auf Ja"

Da die Datei beschädigt ist, lässt sich diese auch nicht per VBA-Code öffnen/einlesen.

Hat jemand ein solches Problem schon einmal gehabt und kann mir helfen?

:)

 

Hallo,

Wie sieht denn der Code aus ?

Gruß
Aloys

 

Hallo aloys,

die Daten schreibe ich von einer Typstruktur aus in ein Array.
Anschließend weise ich dem Range-Objekt das Array zu.

Diese vorgehensweise funktioniert auch einwandfrei.
Ich vermute, dass es beim Speichern Probleme gibt.

Wenn ich die Daten wiederherstelle und anschließend in eine neue Datei kopiee und diuese speicher, wird sie nicht beschädigt und lässt sich Problemlos öffnen.

vbawin

 

Hallo vbawin,

für Deine Verhältnisse wortreich sprichst Du über einen Programmteil, der offenbar zu Deiner Zufriedenheit funktioniert.

Zum eigentlichen Problem gibt es nur Deine Vermutung; reichte es Dir , wenn die jemand bestätigen würde ?

Ansonsten solltest Du mal, wie zuvor schon angeführt, zunächst einmal den Code bereitstellen.

Gruß
Aloys

 

Code:

 

Was soll denn Code:

ergeben. Oder anders gefragt, was ist Code:

Oder noch anders gesagt, der Code kann IMHO nicht funktionieren. Der ist doch schon syntaktisch falsch. Aber Du verwendest wahrscheinlich kein Code:

.

 

..ergänzend zu Storax' Ausführungen:

Wenn man annimmt, dass es ein Datenfeld namens "TestType" gibt (namentlich ungeschickt, da es einen ebensolchen Typ gibt - bei mir hieße das allein zur Unterscheidung fTestType (f für (Daten-)Feld), die Zählervariable lngStartRow nicht einen Laufzeitfehler verursachen würde, da sie zwingend größer wird als die Obergrenze von varAOutput und Null- und 1-basierte Datenfelder offenbar wild durcheinander geworfen werden und demzufolge auch die Ausgabe alles andere als das Datenfeld enthalten kann - selbst wenn man also annimmt, dass der Code fehlerfrei lauffähig wäre, so ist nicht erkennbar, wie er den von Dir beschriebenen Fehler erzeugen sollte.

Dieser Codeteil fehlt immer noch.

 

Mir sind gerade zwei Fehler beim Erstellen des Codes aufgefallen:
Code:

sollte natürlich Code:

hei0en und dann entsprechend Code:

zu Code:

ändern.
Das Befüllen der Datenstruktur funktioniert einwandfrei.
Zu Storax Post:
Code:

passt die Dimension des Arrays varAOutput an, wobei Code:

die Obergrenze der Typstruktur - ähnlich wie einem Array - bestimmt. Und ein Code:

verwende ich und der Code funktioniert ohne Fehler/Probleme.
Die Daten werden Problemlos in Excel geschrieben, aber - wie gesagt - beim Speichern gibt es ein Problem, wobei das Speichern manuell geschieht.

 

Das wäre neu und IMHO stimmt das nicht
https://msdn.microsoft.com/de-de/lib...(v=vs.90).aspx
Außerdem, was ist die Obergrenze einer Typstruktur?

 

Ich nutze die Typstruktur ähnlich wie ein Array.

Die Typstruktur wird mit folgendem Code befüllt:
Code:

@Storax Damit sollten die Fragen geklärt sein.

 

Nein, die Frage ist, was ist UBound(TestType), wenn TestType eine Struktur/Typ ist.

An Hand des Codeschnipsels würde ich sagen, Du machst es wie von EarlFred vermutet: Du hast ein Datenfeld genauso benannt wie Deine Struktur und das Datenfeld ist ein Datenfeld über Deine Struktur, also Code:

Dann geht Code:

 

Eine ernsthafte Auseinandersetzung mit Deinem Problem setzt voraus, dass Du den LAUFFÄHIGEN Code postest, der das Problem verursacht. Das posten von zusammenhangslosen Codefetzen bringt überhaupt nichts. Den Code zum Speichern, den Du als Ursache vermutest, habe ich auch noch nicht entdeckt. Wie soll man Dir da helfen?

Bitte strukturiere das ganze mal.

 

Storax Vermutung ist richtig.
Nochmal: Es geht nicht um die Frage, ob alles mit der Typstruktur funktioniert, sondern, wieso die Datei nach dem Speichern beschädigt ist. Das hat doch wohl nichts mit dem Befüllen der Typstruktur und dem anschließenden Schreiben in ein Excel-Datenblatt zu tun.

 

Hierzu zitiere ich mich mal selbst:

Dieser Codeteil fehlt immer noch.

Wir können uns noch tagelang im Kreis drehen: Anhand der Codefetzen ist das nicht zu beurteilen. Du trägst selbst absolut nichts sinnvolles zur Aufklärung bei. Schimpfen hilft Dir da garantiert als letztes.

 

Stimmt, Schimpfen bringt nichts. Interessiert die Welt nicht.
Aber da EarlFreds Vermutung - ich habe mich nur eingeklinkt - stimmt, wäre es schon nüzlich den kompletten Code zu kennen,
denn es ist zu vermuten, dass da noch mehr "Schmankerl" programmiert sind. Sorry, auch wenn VBA das zulässt, so zu programmieren kann nur zu Fehlern führen.