Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Datei Speichern, Dateiname aus letzter Zelle

Datei Speichern, Dateiname aus letzter Zelle
31.07.2014 08:24:36
Marco
Hallo,
ich habe noch einmal eine Frage:
In der Spalte B habe ich ein Datum stehen. ich möchte nun aus der letzten Zelle der Spalte B das Datum als Dateinamen ohne Punkte als txt-Datei verwenden, z. B. 30072014.txt
Könntet mir noch einmal Jemand behilflich sein?
DANKE
LG Marco

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datei Speichern, Dateiname aus letzter Zelle
31.07.2014 09:26:44
MCO
Moin!
Probier das mal:
Sub save_as()
Dim dat_name As String
Dim ordner As String
ordner = "C:\temp\"     'anpassen
dat_name = Replace(Range("B" & Rows.Count).End(xlUp).Value, ".", "")
ActiveWorkbook.SaveAs ordner & dat_name
End Sub

'Gruß, MCO
Anzeige

326 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige