Office: Probleme bei Speichern laufzeitfehler 1004

Ich brauche dringend Hilfe denn ich bin der Verzweiflung nahe. Ich bekomme ständig eine Fehlermeldung (Laufzeitfehler 1004, Methode "Saveas" für das Object_Workbook fehlgeschlagen) wenn ich versuche die Arbeitsmappe zu speichern. ich habe zwei Speicher-VBA´s : Einer der bislang eigentlich immer funktioniert hat aber nachdem ich den Pfad reduziert habe meckert er

Code:

und Nr. 2 den ich versucht habe zu vereinfachen um wenigstens irgendwie weiter arbeiten zu können:

Code:

bei beiden die selbe Fehlermeldung Dateiname und Ordner zieht er aus ner Zelle des Arbeitsblattes, sie sehen folgendermaßen aus :

Ordner: C:Users/v-+++++/Firmaxxxx/RE&F Event Coordination xxxxxx xxx - Veranstaltungen/2019 MS/März 2019/01.03.2019 AT Barcamp_U30 81 Pax

Dateiname:

Die Datei gleicht dem Endordner wird aber immer um eine römische Zahl ergänzt um zu unterscheiden.

bitte bitte ich sitze schon seid Stunden und seh scheinbar den Wald vor lauter Bäumen nicht mehr.. egal was ich ´versuche... es scheitert

:)

 

Hallo silver.chinchilla,

Du mußt in der letzten For-Schleife den neuen Dateinamen zusammenbauen:
Code:

Gruß von Luschi
aus klein-Paris

PS: statt
datTyp = Mid(s, i) & ".xlsm"
reicht auch
datTyp = ".xlsm"
da Mid(s, i) eine leere Zeichenkette ergibt!

 

Crossposting - Hajo's Excelseiten
Crossposting | Excel ist sexy!
Du hast Glück das JINX nicht mehr da ist, ansonsten würde Dein Beitrag wegen Crossposting geschlossen werden.
Ein Zitat aus der Netiquette (hier im Forum):
Unerwünscht sind auch Crosspostings - also dieselbe Frage gleichzeitig in mehreren Foren (nicht nur im MSOF).
Denn auf diese Weise werden mehrere Gruppen von Leuten mit dem gleichen Thema befasst, ohne dass sie voneinander wissen.
Naturgemäß laufen dann die Antworten, die im einen Forum "zu spät" gegeben wurden, ins Leere und bleiben ohne Resonanz.
Es reicht also, zunächst in einem Forum zu posten - wenn die Antworten dann unbefriedigend sein sollten, steht es einem anschließend immer noch offen, ein anderes Forum zu Rate zu ziehen.
Ich mache keine Werbung für andere Foren und verzichte darum auf den Link.
Die Forumssoftware verhindert das auch bei den meisten Foren.

 

Ach Hajo,
ich glaube, dass vorallem Du ganz schön Glück hast, dass JINX nicht mehr da ist. Deine Textbausteine nerven zumindest mich ganz schön...
Aber einem wie dir will ich ja nicht auf die Füße treten, lese ich mir einen alten Beitrag von dir durch, kann ich dem entnehmen, dass du sogar schon 2013 mit Office2016 auf Win10 mit 64 bit gearbeitet hast. Du bist also einer, der nicht nur in die Zukunft schauen kann, sondern über Technologie der Zukunft verfügt. Da ziehe ich lieber den Hut und halte den Mund ...

 

Danke Luschi das funktioniert schon mal *Smilie gibt es die Möglichkeit das sich die angehängte Zahl (_2, _3 _4) automatisch erhöht wenn die Datei schon vorhanden ist?

 

Hallo silver.chinchilla,

Genau das macht doch in der For-Schleife die Prüfung: If Dir(s2, vbNormal) = "" Then
- gibt es die Datei, dann wird die For-Schleife nicht verlassen, i wird um 1 erhöht
- existiert der neue Dateiname noch nicht (steht ja in der Variablen s2)
- dann wird die For-Schleife durch den Exit For-Befehl verlassen
- und es wird gespeichert mit dem Pfad/Namen, der in s2!!! steht

Gruß von Luschi
aus klein-Paris

 

Vielleicht steh ich aufm Schlauch, der Tag war schon lang an dieser Datei *Smilie aber wenn ich den Dateinamen verändere und die Datei speichere dann hängt er schon beim ersten mal die _2 an. wenn ich dann nichts ändere und nochmal laufen lasse zeigt er wieder 1004 an

 

Hallo silver.chinchilla,

daß mit '_2' begonnen wird, liegt an dieser Forschleife: For i = 2 To 200
Ändere also den Startwert auf i = 1, zum Rest kann ich nur spekulieren, deshalb mein Tipp: setze Haltepunkte (F9-Taste) und steppe den Code anschließend mit der F8-Taste Programmzeile für Programmzeile durch und schaue Dir den Variableninhalt von 's2' an - das ist doch der Programmieralltag, wenn mann Fehler im Code hat, oder hast Du davon noch nie etwas gehört/gelesen?

fragt sich Luschi
aus klein-Paris