Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

CSV-Dateiname in Exceldatei

Forumthread: CSV-Dateiname in Exceldatei

CSV-Dateiname in Exceldatei
07.08.2007 21:39:32
Zürn
Hallo Leute ich habe zwei Probleme.
1. Problem
Ich möchte den Dateinamen von einer CSV-Datei (Name kann sich laufend ändern), welche im Verzeichnis T:\Daten liegt, in einer Excel-Datei haben die ist im gleichen Verzeichnis. Der Dateinamen soll in einer Zelle angedruckt werden.
2. Problem
Wie kann ich diese CSV-Datei mit einem beliebigen Namen in das Verzeichnis T:/Archiv per VBA-Befehl verschieben und das aktulle Datum und Uhrzeit an den Dateinamen hängen, damit es eindeutig ist.
Ich habe keine Ahnung wie ich das anstellen kann.
Kann mir jemand helfen. Bitte, wenn möglich um einfache Lösungen.
Für eine Rückinfo wäre ich Euch sehr dankbar.
Gruß
Zürni

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: CSV-Dateiname in Exceldatei
08.08.2007 00:24:07
Oberschlumpf
Hi Zürn Bernhard
Versuch es mal so:
zu 1. + 2.

Sub CSV_Name()
Dim lstrFile As String
lstrFile = Dir("T:\Daten\*.csv")
ThisWorkbook.Sheets("NameDerTabelle").Range("DeineZelle").Value ) = lstrFile
Name "T:\Daten\" & lstrFile As _
"T:\Archiv\" & Left(lstrFile, Len(lstrFile) - 4) & "-" & _
Replace(Date, ".", "") & "-" & Replace(Time, ":", "") & ".csv"
End Sub


Hilft das?
Ciao
Thorsten

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige