Supportnet Computer
Planet of Tech

Supportnet / Forum / Skripte(PHP,ASP,Perl...)

appen + print #1





Frage

Hallo! Ich habe in Excel-VBA ein kleine SUB die unter Office 2000 perfekt funktioniert hat. Nach Update auf Office 2003 kommt auf mehreren Rechner der Fehlercode 53 beim Befehl Print. Auf dem Entwicklungsrechner, einziger Unterschied, hier ist Visual Studio installiert, gibt es keine Problem. irgendeine Idee? Sub DatenhistorieKundennummer() ' Erledigt am 24.10.2003/17:00 Uhr Startspalte = Worksheets("Steuerdaten").Cells(5, 2).Value Startzeile = Worksheets("Steuerdaten").Cells(5, 3).Value Änderungsgrund = Worksheets("Steuerdaten").Cells(Startzeile + 7, Startspalte).Value Datenzeile = Worksheets("Steuerdaten").Cells(Startzeile + 1, Startspalte).Value Datentrenner = Worksheets("Steuerdaten").Cells(Startzeile + 5, Startspalte).Value Dateiname = Worksheets("Steuerdaten").Cells(Startzeile + 3, Startspalte).Value Datenverzeichnis = Worksheets("Steuerdaten").Cells(Startzeile + 4, Startspalte).Value Gesamtname = Datenverzeichnis + Dateiname AnzahlVerarbeitungen = Worksheets("Steuerdaten").Cells(Startzeile + 2, Startspalte).Value Open Gesamtname For Append As #1 Print #1, Print #1, Datentrenner, Änderungsgrund, For I = 1 To AnzahlVerarbeitungen FeldZeileDB = Worksheets("Steuerdaten").Cells(Startzeile + 7 + I, Startspalte).Value FeldInfo = Worksheets("Kundendaten").Cells(Datenzeile, FeldZeileDB).Value Print #1, Datentrenner, FeldInfo, Next I Close #1 End Sub

Antwort von



Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: