(Tipp 15)
![Nachricht zum Beitrag an Autor Nachricht zum Beitrag an Autor](sitegrafik/icon_direktnachricht.jpg)
![Nach oben Nach oben](sitegrafik/icon_oben.jpg)
Wie erstellt man einen Ordner, wenn dieser noch nicht existiert?
Es wird geprüft, ob der Ordner existiert. Wenn nicht, wird er erstellt. Ggf. noch daran denken, etwaige Fehler abzufangen.
Dim strPfad As String strPfad = "\\COMPUTER\Ordner\Unterordner\" 'Beispiel für Netzwerk strPfad = "C:\Temp\" 'Beispiel lokal If Dir(strPfad, vbDirectory) <> "" Then MsgBox "Verzeichnis existiert bereits" Else MkDir strPfad End If