Live-Forum - Die aktuellen Beiträge
Datum
Titel
04.05.2024 20:49:40
Listbox - ausgewählte Zeile aus Tabellenblatt markieren
04.05.2024 16:03:54
Problem mit einer Regel bei bedingter Formatierung
04.05.2024 10:29:31
.Find(what:=..., Lookat:=xlWhole, LookIn:=xlValues) ->For
04.05.2024 09:44:33
Bestimmten bereich aus einem String per VBA separieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1848to1852
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1848to1852
1848to1852
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Abfrage ob Verzeichnis vorhanden

Abfrage ob Verzeichnis vorhanden
01.10.2021 21:13:38
Thomas
Hallo, ich möchte in einer UserForm beim drücken des Speicher Buttons prüfen ob ein Verzeichnis vorhanden ist, wenn ja soll eine MsgBox ausgegeben werden, wenn es nicht vorhanden ist soll es erstellt werden, allerdings schlägt es bei mir fehl, weil die prüfung ob es vorhanden ist so wie ich es sehe immer ergibt das es nicht vorhanden ist obwohl es vorhanden ist. Wo liegt mein Fehler? Der Code sieht so aus

If Not Dir(Verzeichnis & txtName.Value & "*") = "" Then
MsgBox "Ordner ist schon vorhanden!"
Else
MkDir (Verzeichnis & txtName.Value & "-" & txtNeu.Value)
End If
"Zugriff auf Pfad verweigert und im Debug wird das markiert

MkDir (Pfad & txtWAWI.Value & "-" & txtNeuerLieferant.Value)
was für mich drauf hindeute das die prüfung fehlschlägt, denn da hätte auffalen müssen das es das Verzeichnis schon gibt.
Danke

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abfrage ob Verzeichnis vorhanden
01.10.2021 21:51:33
Thomas
Ich glaube ich hab die Lösung gefunden, zumindest scheint es jetzt zu funktionieren, wenn ich denn kompletten Pfad vorher zusammen setze und einer Variablen zuweise, dann scheint es zu gehen

f Dir(VerzeichnisPruefen, vbDirectory) = "" Then

Anzeige

Links zu Excel-Dialogen

UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige