ich habe folgenden Quelltext erstellt:
Sub test()
quelle = "Mappe1.xls"
wert = ActiveCell.Value
ziel = ActiveCell.Offset(0, 1).Value & "_" & ActiveCell.Offset(0,
2).Value
Select Case wert
Case 1
MkDir "d:\Personen\Mueller\" & ziel
FileCopy "C:\" & quelle, "D:\Personen\Mueller\" ??????????
Das Programm soll folgendes machen:
Nach eingehender Prüfung soll die Datei "Mappe1.xls" welcher in der
Variablen "Quelle" gespeichert ist, in einen Ordner kopiert werden,
der sich aus der Variablen "Ziel" ergibt. Mit dem Befehl "Mkdir
"d:\Personen\Mueller\" & ziel" erstelle ich zunächst den Ordner (wenn
in der Variablen "ziel" z.B. 02_003 stünde, dann würde der Ordner
"02_003" im Pfad "d:\Personen\Mueller\" erstellt werden. Nun möchte
ich die Datei mappe1.xls (variable quelle) in diesen so eben
erstellten Pfad "d:\Personen\Mueller\02_003\" kopieren. Wie geht das
???
Ich hoffe ich habe mich diesmal verständlich ausgedrückt.
Danke im Voraus
Mfg
Nico