Thema Datum  Von Nutzer Rating
Antwort
13.06.2016 09:42:16 Officer_Bierschnitt
NotSolved
13.06.2016 10:03:25 Gast44613
NotSolved
13.06.2016 10:14:08 Officer_Bierschnitt
NotSolved
13.06.2016 10:45:22 Gast23348
NotSolved
Rot Dateien kopieren
 13.06.2016 10:49:35 SJ
NotSolved
13.06.2016 10:51:23 SJ
NotSolved

Ansicht des Beitrags:
Von:
SJ		 Datum:
13.06.2016 10:49:35		 Views:
709		 Rating:
     
Antwort:
  Ja
Thema:
Dateien kopieren

Hallo,

eine Möglichkeit wäre das FileSystemObject.

Dazu einfach den Verweis "Microsoft Scripting Runtime" hinzufügen und wie folgt kopieren:

Public Sub datei_kopieren(ByVal Quellpfad As String, ByVal Zielpfad As String)
    Dim fso As FileSystemObject
    If fso.FileExists(Quellpfad) Then
        'Override beachten!
        fso.CopyFile(Quellpfad, Zielpfad, True)
    End If
    Set fso = Nothing
End Sub

Gruß

SJ

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
13.06.2016 09:42:16 Officer_Bierschnitt
NotSolved
13.06.2016 10:03:25 Gast44613
NotSolved
13.06.2016 10:14:08 Officer_Bierschnitt
NotSolved
13.06.2016 10:45:22 Gast23348
NotSolved
Rot Dateien kopieren
 13.06.2016 10:49:35 SJ
NotSolved
13.06.2016 10:51:23 SJ
NotSolved