Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
868to872
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
868to872
868to872
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateien kopieren und verschieben?

Dateien kopieren und verschieben?
07.05.2007 17:34:01
Frank
Hallo liebe Excelgemeinde
Ich habe folgendes vor:
Ich möchte aus einer Excelanwendung heraus Dateien von einem in einen anderen Ordner kopieren.
Dabei möchte ich die Dateien aber nicht öffnen müssen.
Hat jemand eine Idee, wie sowas VBA-technisch aussehen könnte?
Gruß
Frank

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateien kopieren und verschieben?
07.05.2007 18:02:00
K.Rola
Hallo,
ohne Fehlerbehandlung, eventuell vorhandene Dateien werden gnadenlos überschrieben:

Sub Feilen_kopieren()
Const bolUeberschreiben As Boolean = True
Dim objFSO As Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFile "C:\Quellordner\*.xls", "D:\Zielordner\", bolUeberschreiben
Set objFSO = Nothing
End Sub


Gruß K.Rola

AW: Dateien kopieren und verschieben?
07.05.2007 18:31:00
Frank
Hallo K.Rola
Vielen Dank!
Ich werde das morgen gleich mal ausprobieren.
Kennst Du auch eine Möglichkeit, so nach dem Motto: "Alle xls.-Dateien eines Ordners kopieren in Zielordner" ?
Ich hätte nämlich mehrere hundert Dateien, die ich ja dann alle einzeln ansprechen müsste.
Gruß
Frank

Anzeige
AW: Dateien kopieren und verschieben?
07.05.2007 18:51:00
K.Rola
Hallo,
genau das macht der Code, alle dateien mit der Extension xls werden kopiert.
Gruß K.Rola

AW: Dateien kopieren und verschieben?
07.05.2007 19:49:00
Frank
Bingo - Super - DANKE

AW: Dateien kopieren und verschieben?
07.05.2007 19:53:07
Frank
Hallo K.Rola
Wenn ich das richtig verstehe, steht dann das Sternchen für alle Dateien im angegebenen Ordner, oder?
Wollte ich also nur eine bestimmte Datei eines Ordners kopieren, müsste ich das Sternchen durch den Dateinamen ersetzen nehme ich an.
Wenn ich andere Dateien kopieren möchte, müsste ich die Dateiendung tauschen, also z.B. .doc.
Ich bastel morgen mal in der Fa.
Gruß
Frank

301 Forumthreads zu ähnlichen Themen

Leseschutz für Datei, mit VBA aufheben
Iro

Hallo,
folgendes Problem: ich will zwischen zwei Dateien Daten austauschen. Die A-datei soll grundsätzlich PW-geschützt werden, und zwar so, dass der User weder etwas verändern kann noch sie überhaupt öffnen. Nur wenn der User aus der B-datei mit der vorgesehenen Form Daten überträgt, soll...
21.10.2008 14:18:57
Thread-ID: 1017997
4 Beiträge
Anzeige
flexible txt-Datei öffnen mit VBA
Mike

Hey Cracks,
mittels nachfolgendem Code importiere ich .txt-Dateien ins Excel.
Da es nicht immer die gleiche txt-Datei ist, würde ich gerne die
Auswahl "flexibel" halten. Wie mach ich das?
Sub Txt1_KST_importieren() ' öffnet die exportierten Kostenstellen - Txt1_importieren Mak...
05.02.2009 15:36:31
Thread-ID: 1047405
3 Beiträge
Sheet kopieren, einfügen und umbenennen
Mandy

Hi,
ich muss doch noch mal was fragen:
Ich möchte in meiner Datei von einem sheet einen Kopie machen , neu einfügen und mit Namen benennen. das mach ich so:
Sheets("Temp").Copy after:=Sheets("Temp")
ActiveSheet.Name = "Ablage"
Dazu nun zwei Fragen:
1. Das neue Sheet "Abl...
26.03.2009 22:31:22
Thread-ID: 1064423
5 Beiträge
Anzeige
Ordner kopieren und umbenennen
Benedikt

Guten Abend zusammen
Den ganzen Tag suchte ich Lösungen im Netz, aber ich komme nicht klar
Textbox1 enthält z.b: 9516 Meier. Jetzt möchte ich von Laufwerk O: Vorlagen den ganzen Ordner Test nach O: Aktuelle kopieren und Ihm den Namen 9516 Meier geben.
Kann die bereits darin enthalte...
26.04.2009 21:50:41
Thread-ID: 1071246
3 Beiträge
Makro: Datei (feste Werte) kopieren und versenden
Niko

Hallo zusammen,
bin absoluter VBA-Neuling habe jedocg per google unten stehendes Makro gefunden.
Es hilft mir jedoch nur zum Teil. Ich möchte eine Arbeismappe (welche mehrere Sheets enthält) und mit vielen Verknüpfungen befüllt ist als Versanddatei ohne diese Verknüpfungen erstellen un...
03.06.2009 12:27:02
Thread-ID: 1078831
3 Beiträge
.DAT-Datei speichern mit VBA unter xls
Peter

Hallo Excel-VBA-Spezialisten,
ich habe eine Datei (xxxx.dat) die nach Bearbeitung durch ein Makro letztendlich als xxxx.xls (xxxx bleibt) gespeichert werden soll. Es wird zwar eine xls-Datei gespeichert, aber in der Datei sind immer noch die Texttrennzeichen enthalten. Wie muss ich nachfolg...
18.06.2009 12:47:46
Thread-ID: 1082544
5 Beiträge
Dateien Zählen mit VBA 2003 Mac
Jan

Hallo!
Wie erstellt mann einen Macro die die Anzahl an Dateien in einen Verzeichnis ermittelt. Dazu habe ich verschieden Beispiele gefunden die mit "FileSearch" arbeiten. Leider verwende ich Excel 2003 für Apple, wo dieser Funktion nicht vorhanden ist. Vielleicht kennt jemand einen Workarou...
23.06.2009 16:02:28
Thread-ID: 1083851
3 Beiträge
VBA beim anlegen neuer Datei mit kopieren
Stefanglander

Mal wieder ich,
Hallo Leute
ich habe ein Code von Hajo in meiner Datei eingebaut.
Es geht um den Kalender der sich beim betreten der Zelle einblendet ( ein super Teil, kann ich nur empfehlen).
Nun lege ich mittels folgendem Code eine neue Mappe an:
Sub Tab2() Dim strFile As...
16.08.2009 19:31:38
Thread-ID: 1096268
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
4
2
4
2
2
2
4
2
3
4
6
9
3
1
1
7
8
2
4
4
1
2
6
1