Office: (Office 2016) Prüfen ob Datensatz vorhanden

Hallo Gemeinde,
ich komme mit meinem Projekt gut voran und das liegt nicht zuletzt an der extrem guten Hilfestellung der User dieses Forums.

Aktuell fummel ich an einer Lösung an der ich von Anfang an keinen Einstieg finde

Ich möchte einen Bestimmten Ordner durchsuchen und alle Ordnernamen darin ermitteln.
Ein Ordnername besteht nur aus zahlen
Also z.B. 123456

Es soll geprüft werden, ob in der Datenbank ein Datensatz steht der in einem Feld [Auftragsnummer] = Ordnername ist

Ist dem nicht so, soll ein Datensatz angelegt werden und die Auftragsnummer in der Datenbank als neuer Datensatz angelegt werden.

Wenn ich also einen Ordner habe in dem z.B. 100 Auftragsordner liegen, dann soll beim start der Datenbank der Ordner durchlaufen werden und zu jedem fehlenden Datensatz ein neuer Datensatz angelegt werden.

Hat jemand einen Lösungsansatz oder einen Link wo ich Hilfe bekommen kann ?

herzlichsten Dank im vorraus

:)

 

Der VBA Befehl Dir() ist in der Lage, Ordnernamen im Dateisystem auszulesen.
Allerdings nur in einer Ebene.
Wenn Du das rekursiv für Ordnerbäume brauchst, musst Du Dir das programmieren.
Gibt aber sicher auch Beispielcode dafür - hier oder im Netz.

Für die Maske (Ordnernamen nur mit Ziffern) lässt sich die Funktion regex() einsetzen (regular expressions).

 

Hallo vbanewcomer,

hier ein Lösungsansatz, mit durchsuchen von Ordnern und Unterordnern, prüfen , ob eine Datei bereits in einer Tabelle vorhanden ist usw. Nicht genau das, was du so vorhast, ließe sich aber anpassen.
https://www.ms-office-forum.net/foru...0&postcount=27

Ulrich

 

Moin,

die Beispieldatei DateienVerzeichnisse kann das evtl, oder liefert zumindest die nötigen Hinweise.

Access Beispieldatenbanken – DBWiki

 

Hallo vbanewcomer,

du kannst dir eventuell auch diese Funktion entsprechend anpassen.
VBA Tipp: Alle Dateien eines Verzeichnisses und seiner Unterverzeichnisse auflisten

Gruß
Josef