Automatisches anlegen von word dateien

[havoc]

Hi
Ich schlage mich gerade mit folgendem Problem herum:

Ich habe eine ganze Menge an Word files ( .doc)
die namen sind folgendermassen aufgebaut: 983475AB.doc

die nummer sind eine einmalige nummer und durch das AB wird die "dateinummer" anezeigt. angefangen wird bei AA und geht dann immer weiter.
also für eine nummer können damit mehrere dateien angelegt werden.
nun möchte ich die jeweils letzte datei (muss nicht zwingend als letze geändert worden sein) in ein anderes verzeichnis verschieben und dann dort die "nummer" um einen erhöhen. also zum beispiel von 983475AB.doch auf 983475AC.doc.

hat jemand ne idee wie man sowas auf einem windows 2000 system realisieren kann?? am besten mit VBA-Word, denn das ist schon druff...

ich hoffe ihr habt mich verstanden und ich war nicht einfach nur zu dumm die suchfunktion richtig zu bedienen...

mfg Nils

 

[ANI]

Hallo havoc,

um Buchstabe B zu C zu ändern kannst du die chr() Funktion benutzen.
Letzten Buchstaben mit asc(right(Dokument.Name,1)) auslesen (ohne ".doc")

z.B. B = chr(66)

dann

C= chr(66+1)

dann

name Pfad & Nummer & chr(66) & ".doc" as Pfad & Nummer & chr(66+1) & ".doc"

So ungefähr könnte dies laufen

ANI