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

Dateien kopieren

Forumthread: Dateien kopieren

Dateien kopieren
13.02.2004 20:21:54
Rolf
Ich habe auf dem Laufwerk F:\Epson\*.jpg mehrere Bilder und möchte diese in das Laufwerk C:\Bildereinfügen\ kopieren. Der Dateiname soll erstmal gleich bleiben.
Habe zwar schon einiges gefunden, aber immer nur eine Datei und der Name der Datei mußte auch feststehen.
Danke im vorraus. hoffentlich hat jemand eine Idee.

mfg
Rolf
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateien kopieren
13.02.2004 20:25:16
Alex K.
Hallo Rolf,
mein Vorschlag für eine Lösung

Public Sub OrdnerKopieren()
Dim files       As String
Dim tarpath     As String
Dim path        As String
tarpath = "c:\Bildereinfügen\"
path = "F:\Epson\"
files = Dir(path & "*.jpg")
Do While files <> ""
FileCopy path & files, tarpath & files
files = Dir()
Loop
End Sub

Anzeige
AW: Dateien kopieren , Danke
14.02.2004 15:54:10
Rolf
Hallo Alex,
der Code funktioniert prächtig.
Thanks
Gruß Rolf
;

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