Programmieren - alles kontrollieren 4.941 Themen, 20.708 Beiträge

VBA Programm für Datei speichern unter fortlaufender Nummer

Donald (Anonym) / 4 Antworten / Baumansicht Nickles

Hi schreibe häufig Dateien in Excel (Office 97) mit Dateinamen wie 34723.xls
Wer kennt ein VBA Programm, welches diese Datei unter der nächsten Nummer speichert (also: 34724.xls, die nächste Datei 34725.xls usw)?

bei Antwort benachrichtigen
count (Anonym) Donald (Anonym) „VBA Programm für Datei speichern unter fortlaufender Nummer“
Optionen

Schreib Dir doch einfach ein Makro dafür:

Also ungefähr so:

Sub Save_number

z = Left(ActiveWorkbook.Name, 5) ' Also die ersten 5 Zeichen (bei Dir 34723)
z = z + 1 ' um Eins erhöhen oder wie auch immer
ActiveWorkbook.SaveAs FileName:=z & ".xls"
End Sub


Meld Dich wenn Du Probleme hast

bei Antwort benachrichtigen
Donald (Anonym) count (Anonym) „Schreib Dir doch einfach ein Makro dafür:Also ungefähr so:Sub Save_number z...“
Optionen

Hallo count,

besten Dank. Habe Deinen Makrovorschlag probiert.
C. sagt: Kompilierungsfehler - Erwartet: Ausdruck
und ich bin erst Anfänger in VBA. Vielleicht kannst Du
Makro selbst probieren und mir es bei Funktionieren
nochmals senden.

Danke im Voraus Donald

bei Antwort benachrichtigen
count.negative (Anonym) Donald (Anonym) „VBA Programm für Datei speichern unter fortlaufender Nummer“
Optionen

Gin mir doch mal Deine email Adresse,
dann kann ich Dir ne Datei schicken bei der's funktioniert

bei Antwort benachrichtigen
Donald (Anonym) count.negative (Anonym) „Gin mir doch mal Deine email Adresse,dann kann ich Dir ne Datei schicken bei der...“
Optionen

Hallo count,
meine E-mail Adresse: Rev1043470@AOL.c

Danke

bei Antwort benachrichtigen