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

Forumthread: Werte aus Spalten -> Datein suchen kopieren

Werte aus Spalten -> Datein suchen kopieren
07.11.2024 11:57:25
Rocco
Hallo, ich habe eine ein Tabellenblatt mit Spalte A wo fünfstellige Nummer sind...Beispiel
A
10000
10002
10003
Es sind im Order C:\Test Dateien vorhanden wie
RG10000_01.01.2024.pdf
RG10004_10.01.2024.pdf

Ich würde gern nur die Dateien die die Zahlen von Spalte A enthalten in einen anderen Ordner kopieren,
Beispiel...ob wäre es nur die RG10000_01.01.2024.pdf da die 10004 nicht in der Spalte A ist.

C:\Test-Neu
RG10000_01.01.2024.pdf

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Werte aus Spalten -> Datein suchen kopieren
07.11.2024 13:06:50
UweD
Hallo


so?

Sub Kopieren()

Dim PfA As String, PfN As String, SP As Integer, Z1 As Integer, Z As Long, LR As Long, NName As String

SP = 1 'Spalte A
Z1 = 1 'Keine Überschrift
PfA = "C:\Test Dateien vorhanden\"
PfN = "C:\Test-Neu\"

If Dir(PfA, vbDirectory) = "" Then
MsgBox "Quellverzeichnis nicht vorhanden"
Exit Sub
End If
If Dir(PfN, vbDirectory) = "" Then
'MsgBox "Zielverzeichnis nicht vorhanden"
MkDir PfN
End If

With Sheets("Tabelle1")
LR = .Cells(.Rows.Count, SP).End(xlUp).Row 'letzte Zeile der Spalte

For Z = Z1 To LR
NName = Dir(PfA & "*" & .Cells(Z, SP) & "*.pdf")
If NName > "" Then
FileCopy PfA & NName, PfN & NName

End If
Next
End With
End Sub


LG UweD
Anzeige
AW: Werte aus Spalten -> Datein suchen kopieren
14.11.2024 12:05:03
Rocco
Vielen Dank nochmal...kleines Problem...es gibt mehrere Dateien pro Suchbegriff...es wird nur immer eine Datei kopiert

Beispiel:

RG10000_01.01.2024.pdf
RG10000_02.01.2024.pdf
RG10000_05.01.2024.pdf

im neuen Ordner ist dann nur die RG10000_01.01.2024.pdf anstatt alle 3
Anzeige
AW: Werte aus Spalten -> Datein suchen kopieren
14.11.2024 12:15:08
Rocco
Hallo, vielen Dank nochmal...ein kleines Problem gibt es noch...

Es gibt für den Suchbegriff manchmal mehrere Dateien und es wird leider nur eine kopiert.

Beispiel

RG10000_01.01.2024.pdf
RG10000_02.01.2024.pdf
RG10000_03.01.2024.pdf

Im Ziel Ordner ist dann nur die 1. gefunden Datei kopiert.

RG10000_01.01.2024.pdf
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
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