Ordner anlegen

Forumthread: Ordner anlegen
3 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Ordner anlegen

Ordner anlegen

12.08.2007 15:13:02

Micha

Hallo zusammen,
ich habe sicherlich ein einfaches Problem. Ich möchte gern mittels VBA einen Ordner auf dem Desktop anlegen lassen. Wie kann ich das denn anstellen "lassen"?
Vielen Dank für Eure Hilfe
Gruß Micha

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Ordner anlegen

12.08.2007 15:20:00

Oberschlumpf
AW: Ordner anlegen

12.08.2007 15:25:10

Micha
AW: Ordner anlegen

ransi

AW: Ordner anlegen

12.08.2007 15:20:00

Oberschlumpf

Hi Micha
Versuch mal so:


MkDir Environ("homedrive") & Environ("homepath") & "\desktop\deinOrdner"

Hilft das?
Ciao
Thorsten

AW: Ordner anlegen

12.08.2007 15:25:10

Micha

Super, funzt!!!!
Danke Dir recht herzlich und einen schicken Sonntag noch ...

AW: Ordner anlegen

ransi

HAllo Micha
Eine (von sicher vielen Möglichkeiten) ist so:
' **********************************************************************
' Modul: Tabelle1 Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Sub test()
Dim wsh
Dim DesktopPath
Dim Ordnername
Ordnername = "Irgendwas"
Set wsh = CreateObject("Wscript.shell")
On Error Resume Next
MkDir wsh.specialfolders("Desktop") & "\" & Ordnername
Set wsh = Nothing
End Sub

ransi