Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
852to856
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
852to856
852to856
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Aus Liste Ordner auf Laufwerk erstellen

Aus Liste Ordner auf Laufwerk erstellen
19.03.2007 15:51:00
Thomy
Hallo
Von Wörtern in Spalte A möchte ich auf einem Laufwerk (Netzlaufwerk) Ordner erstellen lassen.
Ich habe hier im Archiv den folgenden Code gefunden:

Sub ordner()
Dim letzte As Long
ChDrive "O:\TB\Test\temp"
For letzte = 1 To Range("A65536").End(xlUp).Row
MkDir Cells(letzte, 1).text
Next
End Sub
Die Ordner werden immer nur im Ordner O:\TB\Test erstellt.
Im Voraus besten Dank für Tipps.
Thomy

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aus Liste Ordner auf Laufwerk erstellen
19.03.2007 15:55:20
Horst
ChDrive "O:\TB\Test\temp\"
mfg Horst
AW: Aus Liste Ordner auf Laufwerk erstellen
19.03.2007 16:08:00
Thomy
Hallo Horst
Mit ChDrive "O:\TB\Test\temp\" funktioniert es auch nicht.
Gruss
Thomy
AW: Aus Liste Ordner auf Laufwerk erstellen
19.03.2007 16:18:00
Dan
So funzt es bei mir:

Sub ordner()
Dim letzte As Long
ChDrive "D"
ChDir "D:\Temp\temp" ' ==> aendern!!!
For letzte = 1 To Range("A65536").End(xlUp).Row
MkDir Cells(letzte, 1).Text
Next
End Sub

Super, funktioniert, vielen Dank
19.03.2007 16:26:55
Thomy
Hallo Dan
Funktioniert bestens, vielen Dank
Gruss Thomy
Super, funktioniert, vielen Dank
19.03.2007 16:27:08
Thomy
Hallo Dan
Funktioniert bestens, vielen Dank
Gruss Thomy
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige