Mkdir

**CicoMico** · 08-31-2007, 01:31 AM

Hello!

can somebody explain to me, why I am getting error on this (path not found):

MkDir Environ("HOMEPATH") + "try"

msgbox shows it correctly...

Thank you

**Bob Phillips** · 08-31-2007, 01:44 AM

Should it be

[vba]

MkDir Environ("HOMEPATH") & Application.PathSeparator & "try"
[/vba]

**CicoMico** · 08-31-2007, 01:51 AM

Originally Posted by xld

Should it be

[vba]

MkDir Environ("HOMEPATH") & Application.PathSeparator & "try"
[/vba]

hmm... i already tried that... still doesn't work...

**Bob Phillips** · 08-31-2007, 02:37 AM

What does MkDir Environ("HOMEPATH") alone give you?

**CicoMico** · 08-31-2007, 03:27 AM

Originally Posted by xld

What does MkDir Environ("HOMEPATH") alone give you?

path not found

**Bob Phillips** · 08-31-2007, 03:29 AM

So that suggest that you don't have such a variable set up does it not, so you cannot use it.

**Bob Phillips** · 08-31-2007, 03:33 AM

How about trying this

[vba]

MkDir CreateObject("WScript.Shell").SpecialFolders(16) & application.PathSeparator & "try"
[/vba]

**rory** · 08-31-2007, 04:41 AM

I think you need:
[VBA]MkDir Environ("HOMEDRIVE") & Environ("HOMEPATH") & Application.PathSeparator & "try"[/VBA]

**CicoMico** · 08-31-2007, 05:15 AM

thanx to all! it is working now!

**mdmackillop** · 09-01-2007, 02:13 AM

"USERPROFILE" works for me.

For a listing, try
[VBA]Sub MyEnvirons()
For i = 1 To 100
Cells(i, 1) = Environ(i)
Next
End Sub

[/VBA]

Thread: Mkdir

Thread Tools

Display

Mkdir

Posting Permissions