Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1688to1692
1688to1692
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Abfrage einbauen

Forumthread: Abfrage einbauen

Abfrage einbauen
29.04.2019 12:24:47
philipp
Hallo zusammen,
hatte dieses Makro vom Matthias, geht einwandfrei.

Sub Pfad_anlegen()
MakeSureDirectoryPathExists _
"C:\test\1\2\3\4\5\"
End Sub
Ich würde gern eine Info einbauen:
"Verzeichnis nicht vorhanden, wird erstellt"
danach
"Verzeichnis vorhanden"
gruß
philipp
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abfrage einbauen
29.04.2019 12:30:50
Matthias
Hi
If Dir("C:\test\1\2\3\4\5\") = "" Then MsgBox "Verzeichnis nicht vorhanden, wird erstellt"
"Verzeichnis vorhanden" dann analog.
Gruß Matthias
Super Matthias, danke ! -)
29.04.2019 12:49:07
philipp
AW: Super Matthias, danke ! -)
29.04.2019 13:09:15
Luschi
Hallo philipp,
leider muß ich da Essig in den Wein Deiner Freudensausbrüche kippen, denn die MsgBox bringt eine
Fake-Meldung!, wenn das Verzeichnis zwar existiert aber ist..
Die Dir-Funktion hat noch einen 2. Parameter, den man unbedingt angeben muß, wenn man auch Verzeichnisse testet und nicht auf Dateien:
If Dir("F:\test\1\2\3\", vbDirectory) = "" ...
ASußerdem emphehle ich die Win-API-Funltoion: MakeSureDirectoryPathExist
siehe: https://www.vbarchiv.net/api/api_makesuredirectorypathexists.html
Gruß von Luschi
aus klein-Paris
Anzeige
Danke Luschi, stimmt -)
29.04.2019 13:16:39
philipp
Hallo Luschi,
Du hast recht.
vbDirectory eingesetzt einwandfrei !
Danke auch nochmals an Matthias !
gruß
philipp
Doch noch Fehler...
29.04.2019 13:11:05
philipp
Hallo Matthias,
habe mal so eingesetzt:
If Dir("C:\_Werkstatt\__Maschinen\Mitarbeiter\" & TJahr & "\") = "" Then
MsgBox "Verzeichnis nicht vorhanden, wird erstellt"
MakeSureDirectoryPathExists _
"C:\_Werkstatt\__Maschinen\Mitarbeiter\" & TJahr & "\""
Else
MsgBox "Verzeichnis ist vorhanden !"
End If
leider wird immer Verz. erstellt obwohl vorhanden.
gruß
philipp
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige