VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: Thomas	Datum: 30.03.2016 08:58:23	Views: 1132	Rating:	Antwort:
Thema: Laufzeitfehler 13
Hallo, vielleicht kann mir hier jemand helfen. Ich verwende von meinem Vorgänger eine Excel Datei, welche bei uns als eine Art Datenbank dient. Érstes Tabellenblatt dort sind die Daten hinterlegt und im zweiten Excelblatt soll eine Schnittstellendatei erzeugt werden. Sobald ich den Knopf drücke erscheint Laufzeitfehler 13... Gehe ich nun auf Debuggen markiert er mir ab hier erste Spalte etwas gelb For Cell = 3 To 1800 If (Not IsEmpty(ActiveSheet.Cells(Cell, 1).Value)) And (ActiveSheet.Cells(Cell, 1).Value) = 3 Then For spalte = 2 To 150 Print #1, CStr(ActiveSheet.Cells(Cell, spalte).Value); "\|"; Next Print #1, End If Next Kann mir jemand helfen. Ist vielleicht in der ersten Tabelle ein Format falsch. Habt ihr Ideen? Danke

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen