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

Speichern mittels Makro

Speichern mittels Makro
27.05.2003 12:03:05
Gunter
Hallo Zusammen,
peterO hat mir letzte Woche schon mit folgendem Makro geholfen:

Sub Speichern()
ActiveWorkbook.SaveCopyAs Filename:=Path & "\" & Format(Now, "YYYY-MM-DD") & ".XLS"
End Sub

Ich wollte zwecks Übersichtlichkeit das Tagesdatum als Vorgabe haben.Das Makro funktioniert. Nun wird die Datei sofort mit dem aktuellen Tagesdatum gespeichert.
Frage: Ist es möglich das "Speichern unter" Fenster noch aufzurufen, damit ich die Pfadangabe ändern und z.B. vor das Tagesdatum noch einen Namen setzen kann?
Die Vorgabe des Makros im Dateinamen müßte so aussehen:
(leer)20030527.xls

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Speichern mittels Makro
27.05.2003 12:05:35
Mike E.

Halo Gunter,

du kannst es mithilfe einer InputBox versuchen:

Sub Speichern()dim Frage as String

Frage = InputBox ("Datum bitte angeben:")
ActiveWorkbook.SaveCopyAs Filename:=Path & "\" Frage & ".XLS"
End Sub

Viele Grüße
Mike


Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige