Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Dateien fortlaufend umbennen

Dateien fortlaufend umbennen
12.08.2015 11:38:50
Frank
Hallo,
ich habe im Ordner L:\Dateien
diverse Dateien stehen.
Alle haben eine Nummer und heissen:
Datei__5 von 745.xlsx
Datei__11 von 745.xlsx
usw.
Alle haben halt eine Nummer, aber nicht fortlaufend.
Ich möchte nun alle Dateien fortlaufend numeriert haben.
Datei__1 von 745.xlsx
Datei__2 von 745.xlsx
usw.
kann mir da bitte jemand den code geben.
Vielen Dank
Gruß Frank

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: für derartige Aktionen: Total Commander ...
12.08.2015 11:45:59
...
Hallo Frank,
... der TC ist mehr als nur ein Tool und kann natürlich noch viel mehr als nur das von Dir gewünschte.
Ich möchte den TC jedenfalls nicht mehr missen. Sieh dazu mal hier: http://www.ghisler.com/
Gruß Werner
.. , - ...

Anzeige
Das hilft mir mom nicht weiter.
12.08.2015 11:59:52
Frank
Kann bitte jemand einspringen ;-)
Danke

AW: Dateien fortlaufend umbennen
12.08.2015 11:59:28
Rudi
Hallo,
Sub aaa()
Dim i As Integer, sFile As String
Const sPfad As String = "L:\Dateien\"
sFile = Dir(sPfad & "*.xlsx")
Do While sFile  ""
i = i + 1
Name sPfad & sFile As sPfad & "Datei_" & i & " von 745.xlsx"
sFile = Dir
Loop
End Sub

Gruß
Rudi

Anzeige
Danke Rudi o.w.t.
12.08.2015 12:02:44
Frank
.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige