Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

Access VBA Ordner prüfen und Öffnen

Begonnen von kfisch, Juni 09, 2016, 07:37:50

⏪ vorheriges - nächstes ⏩

kfisch

Hallo,

hab ein kleines Problem bzgl. Ordnerverwaltung.

Ich möchte aus meiner Access Datenbank prüfen, ob der Ordner zu meiner Auftragsnummer im Laufwerk vorhanden ist.
Sollte dieser nicht angelegt sein, soll eine MsgBox erscheinen "Ordner nicht vorhanden"
Ist der Ordner jedoch angelegt, soll gleich der passende Ordner zur jeweilig ausgewählten Auftragsnummer  geöffnet werden.

Weiß hierzu jemand vielleicht eine Lösung?  :'(

Vielen Dank!

markusxy

#1
Mit der Funktion Dir lässt sich das einfach feststellen:

dir("Pfad",vbDirectory)  liefert den Namen des Ordners falls er existiert.

In der VBA Hilfe gibt es umfangreiche Beispiele.

Statt der Msg Box könntest du den Ordner natürlich auch gleich anlegen.
LG

Edit:
das öffnen eines Ordner mach ich so:
call Shell("""Explorer.exe"" """ & sOrdner & """", 1)