Herbers Excel-Forum - das Archiv

Bewerten Sie hier bitte das Excel-Portal

Neuen Ordner anlegen

Bild

Betrifft: Neuen Ordner anlegen
von: Silvio
Geschrieben am: 01.11.2003 16:35:39
Hallo Zusammen
Meine Frage ist:
Ich Habe In C:\Programme: einen Ordner (Bau) im Ordner befinden sich weitere Ortner ZB. ( 1543 , 2237 ) nun möchte Ich über ein Makro einen neuen Ordner dort erstellen mit Namen aus A1 zB. ist das möglich

Bild

Betrifft: AW: Neuen Ordner anlegen
von: Hajo_Zi
Geschrieben am: 01.11.2003 17:11:16
Hallo Silvio

schaue mal in die VBA Hilfe unter mkdir

Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.


Bild

Betrifft: AW: Neuen Ordner anlegen
von: udo
Geschrieben am: 01.11.2003 17:17:48


Sub Speichern_unter_A1()
ThisWorkbook.SaveAs Range("A1").Value & ".xls"
End Sub


--------------------------------------------
und in A1 schreibst du

C:\Programme\Bau\

beendest du die Angabe in A1 mit bachslash dann wird dort ein Ordner mit diesem Namen ertsellt.

und mit

C:\Programme\Bau\Test

wird dann im Ordner Bau die Datei unter " Test " angelegt

Viel Spass

udo
 Bild
Excel-Beispiele zum Thema " Neuen Ordner anlegen"
Excel-Dateien eines Ordners listen Ordner eines Verzeichnisses in ListBox übernehmen
Bei Doppelklick Ordner im Explorer öffnen Dateien einer Ordnerliste in einer Tabelle zusammenstellen
Ordnernamen eines Verzeichnisses in Zelle einfügen Dateisuche unter Einbeziehung der untergeordneten Ordner
Ordnerdialog mit nachfolgendem Dateidialog aufrufen Aus Dialog Verzeichnis auswählen, dann neuen Ordner erstellen
Die Eigenschaft "Stichwort" in allen Dateien eines Ordners ändern Vorhandensein von Verzeichnissen prüfen und Ordner anlegen