M
MSCom
Neuer Benutzer
Threadstarter
- Dabei seit
- 20.09.2016
- Beiträge
- 1
Hallo Leute,
Ich bin in der VBA Programierung leider kein Experte.
Ich möchte von einem Laufwerk C:\Daten\ ausgewählte Dateien in einen Ordner H:\daten kopieren. Ich krieg es hin, alle Dateien zu kopieren:
Sub Dateien_kopieren()
Dim FsyObjekt As Object
Set FsyObjekt = CreateObject("Scripting.FileSystemObject")
FsyObjekt.CopyFile "C:\Daten\*", "H:\Daten"
End Sub
Soweit klappt alles. Mein Ziel ist folgendes:
In einer excel Datei (copy.xlsx. sheet1) sind in Spalte A ca 50 Dateinamen abgebildet. Diese Dateien sind mit ein paar Hundert anderen im Verzeichnis "C:\Daten\" enthalten. Diese 50 Dateien möchte ich von "C:\daten\" nach "H:\Daten" kopieren.
Hoffe auf eurer Wissen.
Danke
Gayma
Ich bin in der VBA Programierung leider kein Experte.
Ich möchte von einem Laufwerk C:\Daten\ ausgewählte Dateien in einen Ordner H:\daten kopieren. Ich krieg es hin, alle Dateien zu kopieren:
Sub Dateien_kopieren()
Dim FsyObjekt As Object
Set FsyObjekt = CreateObject("Scripting.FileSystemObject")
FsyObjekt.CopyFile "C:\Daten\*", "H:\Daten"
End Sub
Soweit klappt alles. Mein Ziel ist folgendes:
In einer excel Datei (copy.xlsx. sheet1) sind in Spalte A ca 50 Dateinamen abgebildet. Diese Dateien sind mit ein paar Hundert anderen im Verzeichnis "C:\Daten\" enthalten. Diese 50 Dateien möchte ich von "C:\daten\" nach "H:\Daten" kopieren.
Hoffe auf eurer Wissen.
Danke
Gayma
