Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
992to996
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Modul: Dateiname automatisch generieren

Modul: Dateiname automatisch generieren
18.07.2008 16:24:00
Bernd
Hallo,
nun suche ich eine Modul, was mir automatisch den Dateinamen erstellt.
Das Modul soll mit einer Schaltfläche gestartet werden, den "Speichern unter"-Dialog öffnen und den Dateinamen bereits eintragen.
Der Dateiname soll wie folgt aussehen:
- Nummer aus Zelle A1
- Leerzeichen
- Ort (ohne PLZ) aus Zelle A2
- Komma
- Leerzeichen
- Name des Kunden aus Zelle A3
Beispiel:
A1: 807-20100
A2: 12345 Musterhausen
A3: Mustermann & Söhne OHG
Der Dateiname wäre dann "807-20100 Musterhausen, Mustermann & Söhne OHG.xls".
Weiterhin wäre es dann auch noch schön, wenn ich per Button eine PDF-Datei erstellen könnte und im "Save PDF File As"-Dialog dann auch schon der Dateiname "807-20100 Musterhausen, Mustermann & Söhne OHG.pdf" eingetragen wäre.
Das müßte dann im Code irgendwo vor
Application.ActivePrinter = "Acrobat PDFWriter auf LPT1:"
objWks.PrintOut

stehen, oder?
Schöne Grüße
Junker

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Modul: Dateiname automatisch generieren
18.07.2008 17:24:00
Bernd
EDIT:
Habe nun in einer separaten Zelle den Dateinamen "berechnen" lassen und die Formel sofort nach meiner Tabelle angepaßt.
=B73 & " " & TEIL(A11;7;C11-6) & ", " & A7 & ".xls"
B73: Nummer des Angebotes, Auftrages oder der Rechnung
TEIL(A11;7;C11-6): der Ort
A7: der Name des Kunden
Das Ergebnis steht bei mir dann in der Zelle B77.

AW: Modul: Dateiname automatisch generieren
18.07.2008 20:31:38
Jens
Hallo Bernd
Zum ersten Teil vielleicht so:
https://www.herber.de/bbs/user/53956.xls
Zum pdf-Teil kann ich im Moment nichts sagen, da mir die Zeit fehlt.
Ich lasse den Beitrag deshalb nochmal offen.
Gruß aus dem Sauerland
Jens

Anzeige
AW: Modul: Dateiname automatisch generieren
21.07.2008 09:46:57
Bernd
Besten Dank ... funktioniert.
Direkt einen Namen zum Speichern der PDF-Datei vergeben zu lassen, scheint komplizierter zu sein, da der "Save PDF File As"-Dialog offensichtlich von Adobe kommt und nicht von Excel.
Aber: Bevor ich eine PDF-Datei erstelle, speichere ich ja auch meine XLS-Datei.
Entsprechend wurde die Datei dann ja auch schon mit dem passenden generierten Namen gespeichert.
(aus EINGABEMASKE.XLT wurde nach dem speichern 807-20100 Musterhausen, Mustermann & Söhne OHG.xls"). Und wenn ich dann die PDF-Datei erstelle, wird dieser Name ja auch übernommen :-)))
Besten Dank nochmal
Junker
Anzeige

82 Forumthreads zu ähnlichen Themen


Hallo Leute,
ich brauche mal wieder Eure Hilfe:
Mit dem folgenden Makro (hier aus dem Forum) bilde ich den Dateinamen aus dem Zellinhalt; das klappt soweit ganz gut:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Cancel = True Application.EnableEvent...

Hallo Zusammen,
hab' ein kleines Problem:
Wie kann man ein in einer Zelle hinterlegtes Datum im Dateinamen übernehmen.
Gruß Ralf

Hallo Zusammen,
ich hab' immer noch mein kleines Problem, vielleicht weiß hier ja einer weiter?
Wie kann man ein in einer Zelle hinterlegtes Datum im Dateinamen übernehmen.
Gruß Ralf

Hallo Excel-Profis,
ich möchte über ein Makro folgendes ausführen:
- das aktuelle Tabellenblatt soll im Textformat gespeichert werden
- das Dialogfeld "Speichern unter" soll am Bildschirm erscheinen
- der Dateiname soll aus der Zelle I1 in das Dialogfeld übernommen werden
Im...

Hallo Experten,
Ich hab mich nun den halben Tag durchs Forum gehangelt und komm irgendwie doch auf keinen grünen Zweig...
ich habe ein Datenblatt, das von den verschiedensten Leuten verwendet wird; dieses liegt als Vorlage auf dem Server. (N:\Abteilung\Gruppe\Vorlage.xlt)
Nun habe i...

Hallo
kurze frage ist es möglich mit den ersten 7 zeichen von Zellinhalt so wie mit Wildcard
open FILEx*.xls File öffnen, der Hintergrund ist ich muss aus Liste mit Verweis eine Datei öffnen die ersten 7
Zeichen umschreiben das File bereits, hinten nach kommt eher unwichtiges un...
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige