Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1276to1280
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
Inhaltsverzeichnis

löschen von dateien

löschen von dateien
dateien
hallo gemeinschaft
gibt es eine möglichkeit per vba folgendes hinzubekommen
habe eine liste mit bilddateien und einen ordner mit bilddateien
nun möchte ich folgendes ereeichen, dass per vba ein script drüber läuft, welches die dateien, die in dem ordner vorhanden sind in einen neuen ordner kopiert
lg
joerg

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: löschen von dateien
30.08.2012 12:09:59
dateien
Hallo,
in einen neuen ordner kopiert
Was hat das mit dem Betreff zu tun?
kopieren oder verschieben?
Gruß
Rudi

AW: löschen von dateien
30.08.2012 12:53:25
dateien
kopieren

AW: löschen von dateien
30.08.2012 13:34:48
dateien
Hallo,
Liste in Blatt1 A:A
Sub BilderKopieren()
Dim rngC As Range
Const strSource As String = "c:\Temp\"      'anpassen
Const strTarget As String = "c:\temp\neu\"  'anpassen
If Dir(strTarget, vbDirectory) = "" Then MkDir strTarget
With Sheets(1)
For Each rngC In .Range(.Cells(1, 1), .Cells(Rows.Count, 1).End(xlUp))
If rngC  "" Then
If Dir(strSource & rngC)  "" And Dir(strTarget & rngC) = "" Then
FileCopy strSource & rngC, strTarget & rngC
End If
End If
Next
End With
End Sub

Gruß
Rudi
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige