Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Alle Dateien eines Verzeichnisses bearbeiten

Forumthread: Alle Dateien eines Verzeichnisses bearbeiten

Alle Dateien eines Verzeichnisses bearbeiten
24.01.2003 10:22:29
Nino19
Hallo,
ich habe folgendes Problem:
Eine Datei ist geöffnet, aus dem starte ich ein Makro.
Dieses soll mit jeder Excel-Datei, die es in einem vorbestimmten Verzeichnis findet, dasselbe tun: Bestimmte Werte herauskopieren und in der Sammeldatei ablegen. Das habe ich bereits programmiert.
Ich weiss allerdings nicht, wie das mit dem Anwenden auf jede Excel-Datei eines bestimmten Verzeichnisses am besten automatisch geht.
LG, Nino
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Alle Dateien eines Verzeichnisses bearbeiten
24.01.2003 10:29:25
Andreas Walter
Ein Blick in der Recherche hilft Dir

https://www.herber.de/forum/archiv/156to160/t156107.htm

wäre ein Anfang. Such mal z.B. nach DIR (Directory)

Hilft nicht wirklich weiter
24.01.2003 10:50:27
Nino19
Hallo Andreas
danke, habs mir angesehen, versteh aber nichts.
Vielleicht kannst Du mir bei meinem spezifischen Problem helfen.
LG, Nino
Anzeige
Re: Hilft nicht wirklich weiter
24.01.2003 11:05:59
Andreas Walter
Wie wäre es mit
https://www.herber.de/forum/archiv/24to28/t25841.htm

Der Befehl lautet Dir()
Das ist der Ansatzpunkt den Du brauchst

Danke, und hier ist die Lösung
24.01.2003 14:07:40
Nino19
Danke,
Hier ist die Gesamtlösung, die ich nach Deinem Hinweis erarbeitet habe.
Nochmals das Problem:
Ein Makro ("Arbeit02") mit allen Dateien eines bestimmten Verzeichnisses bearbeiten.

Sub Jahr()
Dim DVerzeichnis As String
Dim DName As String
DVerzeichnis = Application.InputBox("Pfad eingeben") & "\"
DName = Dir(DVerzeichnis & "*.xls")
Do While DName <> ""
Workbooks.Open DVerzeichnis & DName
Arbeit02
DName = Dir
Loop
End Sub

LG, Nino

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige