Excel VBA: Dateien kopieren und an anderem Ort ablegen

Diskutiere Excel VBA: Dateien kopieren und an anderem Ort ablegen im Office Forum im Bereich Microsoft Community Fragen; Hallo, mit folgendem Makro kopiere ich selektiv div. einzelne Dateien von einem Ort zu einem anderen: Sub KopierenUndUmbenennen2() Dim FSO...
M

MSCom

Neuer Benutzer
Threadstarter
Dabei seit
20.09.2016
Beiträge
1
Hallo,

mit folgendem Makro kopiere ich selektiv div. einzelne Dateien von einem Ort zu einem anderen:


Sub KopierenUndUmbenennen2()
Dim FSO As Object
Dim varData As Variant
Dim LRow As Long, i As Long
Dim strOld As String, strNew As String

Set FSO = CreateObject("Scripting.filesystemobject")
LRow = Cells(Rows.Count, 1).End(xlUp).Row
varData = Range("A3:D" & LRow)
For i = LBound(varData) To UBound(varData)
strOld = IIf(Right(varData(i, 1), 1) "\", varData(i, 1) & _
"\", varData(i, 1)) & varData(i, 2)
strNew = IIf(Right(varData(i, 3), 1) "\", varData(i, 3) & _
"\", varData(i, 3)) & varData(i, 4)
FSO.copyFile strOld, strNew
Next
MsgBox "Kopieren beendet!"
End Sub

Hat einwandfrei funktioniert. Ich hatte es nun länger nicht genutzt und zwischenzeitlich auf Office 2019 upgedatet. Ohne dass ich etwas geändert habe, funktioniert es nun icht mehr und das Makro bleibt bei

FSO.copyFile strOld, strNew

Hat jemand eine Idee, woran das liegen könnte?

Danke & viele Grüße

Stefan
 
Thema:

Excel VBA: Dateien kopieren und an anderem Ort ablegen

Excel VBA: Dateien kopieren und an anderem Ort ablegen - Ähnliche Themen

  • Microsoft Teams Datei in Excel VBA verlinken

    Microsoft Teams Datei in Excel VBA verlinken: Hallo zusammen, ich habe eine Frage zu einer Programmierung in VBA. Und zwar habe ich zwei Excel-Dateien, wobei die eine Datei über VBA auf die...
  • Eine vorhandene Datei wird nicht gefunden beim Start und Beenden von EXCEL (Fehler 53 aus VBA-Funktion)

    Eine vorhandene Datei wird nicht gefunden beim Start und Beenden von EXCEL (Fehler 53 aus VBA-Funktion): Die Datei libAPlusExcelIntf.1.0..0.dylib ist vorhanden und lesbar, trotzdem kommt beim Öffnen von Excel für Mac Version 16.36 (20041300...
  • Excel 365 löscht alle VBA Userformen beim Öffnen der Datei

    Excel 365 löscht alle VBA Userformen beim Öffnen der Datei: Liebe Microsoft Community, ich habe ein Problem mit meinen Makrodateien. Beim Öffnen einer Exceldatei mit Makros wird ein Problem erkannt...
  • VBA: zeilenweiser Export aus Excel in jeweils separate Datei

    VBA: zeilenweiser Export aus Excel in jeweils separate Datei: Hallo zusammen, ich möchte aus einer Excel-Datei mit insgesamt 250 Zeilen die Inhalte aus jeder Zeile in eine für jede Zeile separate Datei...
  • Ähnliche Themen
  • Microsoft Teams Datei in Excel VBA verlinken

    Microsoft Teams Datei in Excel VBA verlinken: Hallo zusammen, ich habe eine Frage zu einer Programmierung in VBA. Und zwar habe ich zwei Excel-Dateien, wobei die eine Datei über VBA auf die...
  • Eine vorhandene Datei wird nicht gefunden beim Start und Beenden von EXCEL (Fehler 53 aus VBA-Funktion)

    Eine vorhandene Datei wird nicht gefunden beim Start und Beenden von EXCEL (Fehler 53 aus VBA-Funktion): Die Datei libAPlusExcelIntf.1.0..0.dylib ist vorhanden und lesbar, trotzdem kommt beim Öffnen von Excel für Mac Version 16.36 (20041300...
  • Excel 365 löscht alle VBA Userformen beim Öffnen der Datei

    Excel 365 löscht alle VBA Userformen beim Öffnen der Datei: Liebe Microsoft Community, ich habe ein Problem mit meinen Makrodateien. Beim Öffnen einer Exceldatei mit Makros wird ein Problem erkannt...
  • VBA: zeilenweiser Export aus Excel in jeweils separate Datei

    VBA: zeilenweiser Export aus Excel in jeweils separate Datei: Hallo zusammen, ich möchte aus einer Excel-Datei mit insgesamt 250 Zeilen die Inhalte aus jeder Zeile in eine für jede Zeile separate Datei...
  • Sucheingaben

    vba datei kopieren und woanders ablegen

    ,

    vba makro dateien auswählen und an einen anderen ort kopieren

    ,

    vba datei kopieren

    ,
    vbs ordner selektiv kopieren
    , vba kopie einer Datei ablegen
    Oben