Office: Zellinhalt = Dateiname

Guten Abend,

wer kann mir helfen ?? Ich habe da ein Problem. Ich möchte beim Abspeichern meiner Exceldatei den Zellinhalt von( z.B. Zelle H6) als Dateinamen verwenden. Das ganze soll in einem Makro stehen. Das Directory in das Abgespeichert wird bleibt immer gleich.

hier die Makro Zeile.

Activeworkbook.SaveAs FileName:="C:\Eigene Dateien\Excel\ Dateiname.xls", _

Wäre nett wenn ich eine Antwort bokommen würde.

Danke

:)

 

Hallo,

probier's mal damit

Code:

Gruß Jan

 

Hallo

Und wenn sich der Dateiname aus meherern Zellen zusammen setzten soll.
z.B. A1 = 21.01.2004
u. F6 = 77802 (da wäre es von Vorteil wenn vor der Zahl immer ein fester Text erscheinen würde. z.B. Li. )
u. J12 = 7777 (da wäre es von Vorteil wenn vor der Zahl immer ein fester Text erscheinen würde. z.B. Wg. )
Und zum Schluß soll ein Kürzel erscheinen welches der angemeldete User unter Excel benutzt.

Zum Schluß soll der Dateiname wie folgt aussehen:

21.01.2004 Li. 77802 Wg. 7777 JU


Gruß Jens

 

Hallo Jan,

das ging ja super schnell. Vielen Dank es hat funktioniert.

Nur wenn der Dateiname schon existiert und ich die Datei nicht überschreiben will, und ich die Speicherabfrage mit nein beantworte, kommt ein Laufzeitfehler.

Wie wäre es , wenn mann der Datei dann eine Versionsnummer zuweisen könnte, wie z.B. Dateiname_V1 oder ähnlich?

Nochmals vielen Dank für die Hilfe. Wäre toll wenn das auch funktionieren würde.

Gruß

Lothar

 

Hallo Lothar,

mit diesem Makro hängst Du an Deinen Dateinamen aus H6 das aktuelle Datum an (Date). Fehler/Abbrüche werden auch abgefangen.

Code:

Wenn Dir das Datum im Dateinamen noch nicht eindeutig genug ist, kannst Du auch statt Date

Code:

einfügen, was die aktuelle Zeit an den Dateinamen anhängt (Beachte das Vermeiden der Doppelpunkte, da Doppelpunkte in Dateinamen nicht verwendet werden dürfen) oder beides mit & Verketten, was den Dateinamen ganz eindeutig macht.

Bezüglich einer Versionsnummer melde ich mich nochmal, da ich das Beispiel gerade nicht parat habe.

@Jens
Du kannst Deinen Dateinamen aus beliebigen Teilen zusammensetzen, solange Die Konventionen für Dateinamen eingehalten werden.
So kannst Du Werte aus Zellen (Range("H6").Value), Texte ("Li", immer in Anführungszeichen) und Variablen verwenden.
Das Ganze mit & verketten und Du hast Deinen Dateinamen.

Den Usernamen bekommst Du über
Code:

raus. Siehe Antwort von Hajo www.ms-office-forum.net/forum/showthread.php?s=&threadid=114675
zu Deinem Thema "Schaltflächen ein/aus blenden".

Gruß Jan

 

Hallo Lothar,

probier mal das aus:

Code:

Hier wird die Datei unter dem Wert in H6 plus einer fortlaufenden Nummer (bis 10000) gespeichert.

Gruß Jan

 

Hallo Jan,

nochmals vielen Dank für deine kompetente Hilfe. Es hat alles funktioniert und das Makro ist schon in vollem Einsatz. Bei weiteren Fragen zu Makros bzw. Excelproblemen, denke ich, werde ich mich hier wieder melden.

Schönen Abend noch

Bis die Tage

Gruß

Lothar