Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Dateien schnell nummerieren
#1
Hallo,

ich habe ca. 2000 Excel Tabellen, welche ich von 1 bis 2000 durchnummeriert habe. Leider habe ich einen Fehler gemacht und Nummer 543 gibt es 2x. Somit passen ab dieser Nummer die restlichen nicht mehr. Gibt es eine Möglichkeit das ganze schnell auszubessern, ohne ca. 1500 Dateien von Hand umbenennen zu müssen?
Antwortento top
#2
Hallo,

ungeprüft, deshalb bitte erst einmal testen:


Code:
sub Fen
'höchste Zahl ist 2000
iPath = "c:\temp\" '<<<<<<<<<< anpassen
for i = 2001 to 543 step -1
Name iPath & i-1 & ".xlsx" AS iPath & i & ".xlsx"
next i
end sub


mfg
Antwortento top
#3
Hallo,

wie muss ich das ganze denn einfügen? Habe mit Makros und dergleichen noch nicht so viel gearbeitet!
Antwortento top
#4
Hallo,

zuerst ein gut memeinter Rat: frage einen Kollegen oder Freund, der sich zumindest etwas auskennt.

Z.B. mit alt-F11 öffnet sich der VBA-Editor, danach alt, e, m erzeugt ein neues allgemeines Modul.

Bitte erst testen.

mfg
Antwortento top
#5
Hallo Fennek,


Zitat:zuerst ein gut memeinter Rat: frage einen Kollegen oder Freund, der sich zumindest etwas auskennt.


Dafür ist doch das Forum da, damit man hier alles fragen kann.

Das, was ich kann, habe ich auch nur über Fragen und Antworten in Foren gelernt.


Und hier z.B kann man einige nützliche Dinge Erfahren: online-excel
Gruß Atilla
Antwortento top
#6
Nein, Attila, Fennek weist hier auf die besondere Situation hin.

Dateien umbenennen ... wer kopiert schon 2000 Dateien in ein Testverzeichnis? Das wäre zu empfehlen, aber mancher ist dazu zu faul. Deshalb die Sache "mit einem, der sich auskennt", und zwar am besten am PC.
Antwortento top
#7
Hallo Lupo,

mag sein, dass ich das falsch interpretiere.

Aber die genauen Hintergründe und das Wissen- oder Unwissen des Anderen sind mir ja auch nicht bekannt.

Von Fennek Tipp gemeint ist es ja wieder im Sinne des Forums. Blush
Gruß Atilla
Antwortento top
#8
Hallo

anbei eine kleine Beispieldatei, wo man im Blatt Fennek in Zelle B1 nur noch den Pfadnamen des Ordners einfügen muss. Es gibt zwei Makros von Fennek. Das Original, das alle Dateien von 543-2000 umbenennt, und ein Test Button für Datei 543-546, die man als Testdatei in einen Testordner kopieren kann. Dann sieht man sofort ob Fenneks Makro funktioniert.

Die beiden anderen Tabellen kann man zum auflisten eines Ordners und zum normalen Dateien Umbenennen benutzen.

mfg  Gast 123


Angehängte Dateien
.xls   Dateien umbenennen Neu.xls (Größe: 44 KB / Downloads: 3)
Antwortento top
#9
(16.01.2017, 17:18)Crea schrieb: Leider habe ich einen Fehler gemacht und Nummer 543 gibt es 2x.

Leider ist es noch schlimmer: ein Directory kann keine 2 Dateien mit identische Namen enthalten.
Antwortento top
#10
Ups ... snb hat recht.

Somit gibt es möglicherweise nur eine 543 - und insgesamt nur 1999 Dateien. Dann wäre die Soll-543 überschrieben durch die Soll-544.

Das sollte TE aufklären. Oder, ob die zweite 543 eine Ergänzung am Namen bekommen hat, so dass sie doch zweimal da ist.
Antwortento top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste