Moin
Brauche eure Hilfe.
Ich möchte auf einen Server ein Verzeichnis aus Excel 2010 mit VBA erstellen.
Rechte sind vorhanden.
Und haben folgendne Code:
'Ablageordner Zusammenstellen
l = "\\xx.xx\xxyyy\c-c\cc\0815\groups\04_vv_vbvbvb\vbnm\" 'Laufwerk
j = "daten " & Format(Date, "yyyy") + 1 ' Jahresordner
f = "\" & UserForm1.zzzzz.Value
b = "\" & UserForm1.kkkkk.Value
Ord = CStr(l & j)
'Verzeichnis erstellen
If Dir(Ord, vbDirectory) <> "" Then
MsgBox "ist Vorhanden"
Else
MsgBox "wird Erstellt"
MkDir Ord
End If
f und b sind ComboBoxen, auch .text wird nichts.
So wird das Verzeichnis erstellt. "Ord = CStr(l & j)"
Sobald ich aber das Verzeichnis erweitere "Ord = CStr(l & j & f &b)" ist die Erstellung nicht mehr möglich.
Dieser Code ist der letzte Stand und etwas wirr, aber ich bekomme langsam graue Haare.
Vielen Dank im vorraus für eure Hilfe
|