obwohl das Verzeichnis vorhanden ist,
kommt Fehlermeldung.
Laufzeitfehler 75
Fehler bei Zugriff auf Pfad/Datei
Public Sub Verzeichnis_ob_da()
If Dir("C:\Users\wb_7L\mb", vbDirectory) = "" Then
MsgBox "Verzeichnis nicht da ! "
Exit Sub
Else
' MsgBox "Verzeichnis vorhanden !"
MkDir ("C:\Users\wb_7L\mb")
End If
End Sub
grußwalter mb