Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
380to384
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
380to384
380to384
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ordner mit Inhalt Kopieren ohne Unterordner / Alex

Ordner mit Inhalt Kopieren ohne Unterordner / Alex
17.02.2004 13:46:51
Jacob
Hallo,
habe schon wieder ein Problem, was ich nicht lösen kann. Vielleicht was jemad von Euch Bescheid (Alex.K ???).
Ich möchte mittels eines Makro Ordner incl. Dateien von einem Verzeichnis in ein anderes kopieren. Unter dem quell-Ordner befinden sich div. Dateien (xls, doc etc. - die möchte ich kopieren)und Unterordner die NICHT mitkopiert werden sollen. Danke im Voraus für Eure Hilfe
Jacob

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ordner mit Inhalt Kopieren ohne Unterordner / Alex
17.02.2004 13:58:37
Alex K.
Hallo Jakob,
da hatten wir schon eine Lösung. Unterordner werdne nicht mitkopiert, das wäre um einges aufwendiger.
Mein damaliger Code:

Public Sub OrdnerKopieren()
Dim files       As String
Dim tarpath     As String
Dim path        As String
'Hier den Zielpfad eintragen, wichtig das abschliessende "\"
tarpath = "d:\eigene dateien\test\"
'Hier den Quellpfad eintragen, auch hier das abschliessende "\"
path = "c:\eigene dateien\test\"
'hier ändern, wenn bestimmte Dateien kopiert werden sollen, also "*.xls" für
'Excel-Dateien
files = Dir(path & "*.*")
Do While files <> ""
FileCopy path & files, tarpath & files
files = Dir()
Loop
End Sub

Anzeige
AW: Ordner mit Inhalt Kopieren ohne Unterordner / Alex
17.02.2004 14:04:39
Jacob
Hallo Alex,
ich wusste es, man kann sich auf dich verlassen. Du hast Recht, das hatten wir schon Mal aber ich habe es irgendwie vergessen. Danke für die Express-Antwort und viele Grüße.
Jacob
Gern geschehen - warte auf die nächste Fragen :-)
17.02.2004 14:07:34
Alex K.

309 Forumthreads zu ähnlichen Themen

Zellen kopieren (mit Formatierung)
Yves

Hallo zusammen,
ich möchte Daten von einem Tabellenblatt (Tabelle2) in ein anderes Tabellenblatt (Tabelle1) kopieren.
Habe dies bis anhin so gelöst:
sheets("Tabelle1").cells(1,1).value = sheets("Tabelle2").cells(5,1).value
Somit wurden einfach nur die Werte 'kopiert'. Nun würde...
08.08.2008 14:09:18
Thread-ID: 1000289
8 Beiträge
Anzeige
aus kompletter Mappe NUR WERTE kopieren
Lauren

Hallo zusammen,
das ist wohl etwas simples aber ich bin nicht dahintegekommen.
Ich will eine Kopie einer Excel-Mappe mit ca. 80 Tabellenblättern erstellen aber es sollen NUR DIE WERTE kopiert werden also ohne Formeln usw. nur die Werte.
Dann in allen Tabellenblättern in der Kopierte...
17.09.2008 11:04:00
Thread-ID: 1010287
5 Beiträge
1:1-Kopieren ohne dass Formeln "angepasst" werden
Wolfango

Hallo Experten!
Eine Spalte enthält lauter Formeln (alles relative Bezüge). Wenn ich diese komplette Spalte (markiert über Klick auf Spaltenkopf) in eine neue, unbenutzte Spalte kopiere werden (aufgrund der relativen Bezüge) ja stets alle Formeln automatisch angepasst (egal ob über das Menü...
17.09.2008 15:45:18
Thread-ID: 1010435
3 Beiträge
Anzeige
Nur Werte kopieren!
markus473

Hallo zusammen,
ich habe ein Makro, welches Daten kopiert.
Jetzt wäre es besser, wenn es nur die Werte kopiert, da dann die Formatierung erhalten bleibt.
Wie müßte das denn dann aussehen?
Danke Gruß Markus
Sub Uebernahme_Januar() Dim sh As Worksheet UF_Dateiauswahl1.Show I...
26.01.2009 15:27:51
Thread-ID: 1043917
7 Beiträge
nur werte kopieren!
lisa

Hallo zusammen
Dieses Thema ist nicht nur in diesem Forum mehrfach angesprochen worden.
Ich rafe es nicht, trotz Recherche, hiefür nur den Wert kopieren zu lassen.
Das ist mein Orig. Gode
Private Sub CommandButton3_Click() Sheets("Dateneingabe").Range("L2").Copy Sheets("Liefer...
03.03.2009 14:07:47
Thread-ID: 1055975
5 Beiträge
Daten per Makro kopieren ohne Formeln
Kai

Hi,
ich möchte Zeilen innerhalb einer Mappe von einem Tabellenblatt ins ander kopieren. Meine Daten stehen in der Tabellen "IMPORT" (Zeilen 10:100) und sollen nach "DATENBESTAND" ab Zeile 50 reinkopiert werden.
Das kopieren alleine wäre sicher nicht das Problem, aber in meinem Tabellenb...
05.03.2009 13:05:31
Thread-ID: 1056794
3 Beiträge
Copy - Paste ohne Formattierung
Markus

Hallo liebe Excel- Gemeinde:
Leider bin ich bei der Suche im Archiv nicht auf das gestoßen was ich brauche.
Ich habe folgendes Codesegment:
With ActiveWorkbook
'Eingangsdatum
.ActiveSheet.Range("C5").Copy
ThisWorkbook.Activate
ActiveCell.Offset(0, 19).Activate
Ac...
25.03.2009 14:02:40
Thread-ID: 1063773
6 Beiträge
Autofilter - nur gefilterte Werte kopieren ?
Piet

Hallo zusammen,
angenommen ich habe in Spalte A diverse Produkte (Produkt A, Produkt B, usw.)
und in Spalte B diverse Zahlenwerte zu den Produkten.
Z.B.:
Produkt Wert
a 27
b 13
b 17
a...
08.04.2009 15:38:42
Thread-ID: 1067762
3 Beiträge

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
7
5
4
2
6
6
4
2
5
2
20
12
12
2
2
3
12
2
3
2
1
6
4
2
1