Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
18.04.2024 17:45:21
Shellkommando ausführen, stderr auslesen
18.04.2024 17:41:41
Summe: Bestimmter Bereich mit sverweis
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
364to368
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
364to368
364to368
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Speichern Makro

Speichern Makro
19.01.2004 12:48:33
Bernd
Hallo Leute,
ich habe diese Frage schon einmal gestellt und nun finde ich sie nicht mehr..! Schäme mich auch schon!
Also, ich möchte ein Makro erstellen, das die Arbeitsmappe speichert und ihr den Namen aus einer Zelle plus das aktuelle Datum gibt.
Danke für Eure Hilfe...
Bernd

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Speichern Makro
19.01.2004 12:57:44
Ulf
Option Explicit

Sub speichern()
Dim Dateiname As String
Dateiname = Sheets("Tabelle1").[a1] & Format(Date, "dd-mm-yyyy")
ThisWorkbook.SaveAs Dateiname
End Sub


Ulf
AW: Speichern Makro
19.01.2004 12:58:54
xXx
Hallo,
Activeworkbook.SaveAs (Filename:=Range("A1")&Format(Date,"YYYYMMDD") &".xls"
Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen an die Antworter!
AW: Speichern Makro
19.01.2004 13:01:20
Andreas Horder
Hallo Bernd
VBA-Code:

Sub a()
Dim f As String
f = Range("A1") & Format(Now, "dd.mm.yyyy")
ActiveWorkbook.SaveAs Filename:=f
End Sub

Anzeige
AW: Speichern Makro
19.01.2004 13:02:20
jonathan 

Sub speichern()
myPfad = "C:\test"
myDatei = ThisWorkbook.Name
myDate = Format(Now, "YY-MM-DD")
ActiveWorkbook.SaveAs Filename:=myPfad & "\" & myDatei & " " & "Date " _
& myDate
End Sub

dabei speichert er aber die aktuelle datei unter dem namen, d.h. beim chten öffnen heißt sie so, dhinter wird nun wieder das datum gesetzt usw..... der name wird also immer länger.....
hoffe, das hilft.....

jonathan
AW: Speichern Makro
19.01.2004 13:39:41
Bernd
Hallo Leute,
danke für Eure zahlreiche Hilfe....

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige