Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
616to620
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
616to620
616to620
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Hilfe ! Bug in VBA - "File not found" nach SP3 !?

Hilfe ! Bug in VBA - "File not found" nach SP3 !?
01.06.2005 10:15:45
wagner@surdata.de
Hallo folgendes Problem…
Ich habe eine Anwendung für eine Kunden unter EXCEL-VBA programmiert wobei unter anderem Text-Dateien ausgegeben werden.
Quellcode:
Public Sub StartSeiteErstellen()
Dim fileNr
mDateiName = Pfad_AktKatalog & "Katalog.htm"
mstrHTML_Kopf1 = Range("HTML_StartSeite_Kopf").Value
mstrHTML_Kopf1 = mstrHTML_Kopf1 & Range("HTML_StartSeite_Body").Value
mstrHTML_Kopf1 = mstrHTML_Kopf1 & Range("HTML_StartSeite_Fuß").Value
mstrHTML_Kopf1 = fVariablenErsetzen(mstrHTML_Kopf1)
' Datei-Ausgeben:
fileNr = FreeFile
Open mDateiName For Output As fileNr
Print #fileNr, mstrHTML_Kopf1
Close #fileNr
Exit Sub
Die Variable „Pfad_AktKatalog“ wird dabei aus einem Zelleninhalt eines Worksheets gefüllt.
Entwickelt wurde unter Excel 2000 (ohne SP), der Kunde setzt ebenso Excel 2000 ein.
Bisher lief die Anwendung einwandfrei, nachdem der Kunde allerdings SP3 installiert hat kommt es bei dem OPEN-Befehl zu einem „Error 53 - File not found“.
Jetzt kommt das merkwürdigste:
Wenn der Kunde mir seine Excel-Datei zukommen lässt (er hat lediglich die Ausgabepfade innerhalb des Worksheets geändert) tritt der Fehler bei mir auch auf. Die Anwendung läuft auf 90 % aller Rechner einwandfrei, nur auf bestimmten PC’S mit dem SP3 tritt der Fehler auf.
Wer kennt dieses Problem bzw. wer kann helfen ?
Bitte keinen Tip in Richtung Umstellung auf „Filesystem Object“… ;)
Danke im voraus !

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hilfe ! Bug in VBA - "File not found" nach SP3 !?
05.06.2005 10:38:13
Micha
Hallo,
kann das Verhalten Deines Codes nicht nachvollziehen.
Getestet auf Win2000 mit Excel2000 (SP-3)
CODE:
Public

Sub StartSeiteErstellen()
Dim fileNr, Pfad_AktKatalog
Pfad_AktKatalog = Range("A1").Value  'hier steht "C:\"
mDateiName = Pfad_AktKatalog & "Katalog.htm"
mstrHTML_Kopf1 = Range("HTML_StartSeite_Kopf").Value 'hier steht "Hallo"
'mstrHTML_Kopf1 = mstrHTML_Kopf1 & Range("HTML_StartSeite_Body").Value
'mstrHTML_Kopf1 = mstrHTML_Kopf1 & Range("HTML_StartSeite_Fuß").Value
'mstrHTML_Kopf1 = fVariablenErsetzen(mstrHTML_Kopf1)
' Datei-Ausgeben:
fileNr = FreeFile
Open mDateiName For Output As fileNr
Print #fileNr, mstrHTML_Kopf1
Close #fileNr
End Sub

Die Datei wird einwandfrei angelegt......
Micha
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige