Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
892to896
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
892to896
892to896
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datei speichen - von links nach rechts

Datei speichen - von links nach rechts
31.07.2007 15:30:46
links
Hallo Excel-Freunde,
ich habe mir von Hajo folgenden Code geben lassen (danke nochmal):
Option Explicit

Sub Datei_vorhanden()
'   von Berti Koern
Dim Fso, Dateiname
Set Fso = CreateObject("Scripting.FileSystemObject")
Dateiname = "D:\Eigene Dateien\Hajo\Adresse.xls"
'   Egänzung öffnung Hajo
If Fso.FileExists(Dateiname) Then
FileCopy "D:\Eigene Dateien\Hajo\Adresse.xls", _
"P:\Eigene Dateien\Hajo\Adresse.xls"
End If
End Sub


Eigentlich hatte ich vor, die Datei in das 2. Verzeichnis nur kopieren zu lassen, wenn die Datei unter diesem Namen noch nicht existiert. Sollte die Datai also schon da sein, soll nichts passieren. So wie der Code geschrieben ist, wird die Datei allerdings ersetzt.
Könnt Ihr mir hier helfen?
Danke.
Viele Grüße
Marco

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

Betreff
Datum
Anwender
Anzeige
AW: Datei speichen - von links nach rechts
31.07.2007 15:35:45
links
Hallo mtremer

Sub Datei_vorhanden()
'   von Berti Koern
Dim Fso, Dateiname
Set Fso = CreateObject("Scripting.FileSystemObject")
Dateiname = "D:\Eigene Dateien\Hajo\Adresse.xls"
'   Egänzung öffnung Hajo
If Not Fso.FileExists(Dateiname) Then
FileCopy "D:\Eigene Dateien\Hajo\Adresse.xls", _
"P:\Eigene Dateien\Hajo\Adresse.xls"
End If
End Sub


Gruß Armin

AW: Datei speichen - von links nach rechts
31.07.2007 15:54:05
links
genau so!
Danke, Armin.
Viele Grüße
Marco
Anzeige

307 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige