Hallo,


ich durchforste nun schon seit  Stunden das Internet, kann aber keine funktionierende Lösung für mein Problem finden.
Ansätze sind zwar da, aber nie das was ich will.


Folgende Problemstellung: DATEIEN PER VBA UMBENENNEN


Ich bekomme von Lieferanten Bilddateien, die z.B. wie folgt benannt sind:
    135357.jpg
    135357_2.jpg
    135357Koffer.jpg
    135357-Zubehoer.jpg
    .......

Ich muss diese Dateien mit unserem vorhandenen Artikelstamm abgleichen und die Dateien mit unserer Artikelnummer versehen.
Aus o.g. Vier Beispielen muss also werden:
    0898815.jpg
    0898815_2.jpg
    0898815_3.jpg
    0898815_4.jpg
    ....

Hierfür habe ich eine Exceltabelle (Artikelstamm) zur Verfügung, welche
    zum einen in Spalte A Die Werksnummer (Lieferanten-Artikelnummer) und
    zum Anderen in Spalte B meine Artikelnummer enthält.


Also konkret: es muss Spalte für Spalte geprüft werden, ob in dem Pfad, in dem die (hier gesuchte) VBA/Excel-Datei liegt, eine oder mehrere Dateien existieren, welche in Ihren Dateinamen die in Spalte A stehenden alphanumerische Kombination (ggf. mit Sonderzeichen) enthalten. (Diese wäre in o.g. Beispiel IMMER "135357" als Lieferanten (Werks-)Nummer.
Diese Dateien müssen entsprechend Spalte B (fortlaufend (*_2.jpg)) umbenannt werden.

WICHTIG: Es muss immer nach dem kürzesten bzw. ersten Dateinamen gesucht werden, da Dateinamenszusätze in der Regel erst bei mehreren bilder hinzu kommen (z.B. *_Koffer.jpg)
Sollte aber kein problem sein, da unsere Artikelnummern Gewissenhaft immer nur einmal angelegt sind.
Wenn also ein Dateiname den text aus Spalte A enthält passt es zu 99% immer.

Ich hoffe das ist einigermaßen verständlich ausgedrückt. =)


P.S.: Genial wäre es, wenn diese Umbenennungsprozedur 4x durchlaufen würde:
    1. mit den konkreten Dateinamen + Spalte A
    2. ohne Berücksichtigung der Sonder- und Leerzeichen in Spalte A
    3. ohne Berücksichtigung der Sonder- und Leerzeichen in den Dateinamen
    4. ohne Berücksichtigung der Sonder- und Leerzeichen in Spalte a UND den Dateinamen

.....liegt einfach daran, dass Bilder teilweise ohne die eigentlich dazugehörigen Sonderzeichen (Artikelnummer) benannt werden oder das diese beim der eigenen Artikelpflege auch mal vergessen werden können.......
Ich denke, so kann man dann 95% der korrekten Dateien auslesen und umbenennen.


Viel Rede, kurzer Sinn,

vielleicht ist das ganze ja auch nicht soooo kompliziert ;)

Vielen Dank im Voraus!!!