Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
660to664
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
660to664
660to664
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ThisWorkbook.SaveAs Methode

ThisWorkbook.SaveAs Methode
07.09.2005 14:04:25
Christian
Hallo Forum,
ich verwende die VBA-Methode: "ThisWorkbook.SaveAs Filename:=fName" in meiner Arbeitsmappe.
Die Methode funktioniert aber nur solange der Filename (Pfad + Filename + Extension) die Grösse von 150 Zeichen nicht
überschreitet. Beim überschreiten stürzt Excel ab (Schutverletzung).
Leider haben wir recht verschachtelte Ordnerstrukturen und erreichen somit fast immer mehr als 150 Zeichen.
Hat jemand einen Workaround für dieses Problem?
Danke und Gruss
Christian

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ThisWorkbook.SaveAs Methode
07.09.2005 14:14:05
Heiko
Hallo Christian,
bist du sicher das es an SaveAs liegt, habe es gerade bei mir (XP und EXCEL 2002) mit 179 Zeichen und StringVariable getestet, und das lief.
Was ist fName den für ein Datentyp ?!
Gruß Heiko

PS: Rückmeldung wäre nett !
AW: ThisWorkbook.SaveAs Methode
07.09.2005 15:10:06
Christian
Hi Heiko,
bin mir sicher, dass es an SaveAs liegt. Verwende ich einen Dateinamen mit exakt 149 Zeichen, tritt das Problem nicht auf. Ab 150 Zeichen crasht Excel dagegen. ThisWorkbook.Save funktioniert ohne Probleme.
fName ist vom Type Variant.
Weiss jemand ob ich den Standardpfad in den Excel die Arbeitsmappe speichert vorher mittels ChDrive / ChDir wechseln kann? Dann wären die langen Dateinamen kein grösseres Problem.
Danke im Voraus
Christian
Anzeige
AW: ThisWorkbook.SaveAs Methode
07.09.2005 16:58:34
Fred
Hi,
ja, kann man.
mfg Fred
Problem gelöst
07.09.2005 17:15:35
Christian
Hi Fred,
habe das Problem nun mittels ChDrive and ChDir gelöst.
Vor dem Speichern der Arbeitsmappe einfach folgende Befehle ausführen:
ChDrive(ThisWorkbook.Path)
ChDir(ThisWorkbook.Path)
ThisWorkbook.SaveAs ThisWorkbook.Name
Die SaveAs Methode benutzt den mittels ChDrive und ChDir eingestellten Pfad, wenn der angegegebene Name keinen Pfad enthält. Damit kann ich zumindest die verschachtelten Verzeichnisstrukturen umgehen.
Gruss Christian

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige