Private Sub CommandButton1_Click() verzeichnis = "\\fileserver\Alle\" + Worksheets("Eingabe").Range("b4").Value MkDir verzeichnis End Sub
58.4k Fragen
249k Antworten
7k Nutzer