Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Ordner automatisch anlegen

Forumthread: Ordner automatisch anlegen

Ordner automatisch anlegen
Karschti
Hallo Leute,
wer kann mir kurz helfen? Ich habe eine Spalte B mit ganz vielen Namen. Jetzt soll Excel mir zu jedem dieser Namen (Einer pro Zeile) einen Ordner anlegen. Wie bekomm ich Excel mit Hilfe von VBA davon überzeugt?
Gruß Karschti
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Ordner automatisch anlegen
16.02.2006 17:54:54
ChrisL
Hallo

Sub t()
Dim iZeile As Long
On Error Resume Next
For iZeile = 1 To Range("B65536").End(xlUp).Row
If Cells(iZeile, 2) <> "" Then
MkDir ("C:\Pfad\" & Cells(iZeile, 2))
End If
Next iZeile
End Sub

Quick and dirty d.h. keine Plausibilisierung ob Ordner schon vorhanden oder ob der Name Sonderzeichen entählt.
Gruss
Chris
Anzeige
AW: Ordner automatisch anlegen
16.02.2006 18:10:07
Karschti
Vielen Dank Chris - das wars - ist ja gar net so schwer zu verstehen. Vielleicht sollte ich wirklich mal anfangen etwas VBA zu lernen.
Gruß Karschti
AW: Ordner automatisch anlegen
16.02.2006 18:24:00
ChrisL
Hallo
Danke für die Rückmeldung.
Ist echt nicht schwer, dafür Fun. Forum lesen hilft auch :-)
Gruss
Chris
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige