Hi,

I am trying to find out how to create a folder in the My Documents folder.

I tried looking for system variables that could lead me to the location of
the my Documents folder, so that I coudl use mkdir and the path, but the
problem is, the my document is mapped to the server, and not to the
C:\documents and settings subfolders.

Will appreciate if i could get some help on this.

I will eventually want to create folders within the new folder in the My
Documents.

Thank you!

Ali

I',m not sure ...you could record a macro & record the path that way.
"usuall" the desktop comes under the users path
C:\Documents and Settings\username
however, as with my organisation, teh users desktop is saved on a network,
privately accessible only bu th euser, so that th euser can log-on from any
station and have access to the correct applications.




Sub vars()
Dim index As Long
index = 1
On Error Resume Next
Do
Cells(index + 1, 1) = index
Cells(index + 1, 2) = Environ$(index)
index = index + 1
Loop Until Err.Number < 0
End Sub




"Ali" wrote:

Hi,

I am trying to find out how to create a folder in the My Documents folder.

I tried looking for system variables that could lead me to the location of
the my Documents folder, so that I coudl use mkdir and the path, but the
problem is, the my document is mapped to the server, and not to the
C:\documents and settings subfolders.

Will appreciate if i could get some help on this.

I will eventually want to create folders within the new folder in the My
Documents.

Thank you!

Ali

Use WSHost for getting the full MyDocuments path, change to that dir and
create a new folder.

Public Sub addMyDocumentsDir()
Dim wShell, fso, strFldr As String
Set wShell = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
strFldr = wShell.SpecialFolders("MyDocuments")
ChDir (strFldr)
fso.CreateFolder ("test123")
End Sub



"Ali" schreef in bericht
...
Hi,

I am trying to find out how to create a folder in the My Documents folder.

I tried looking for system variables that could lead me to the location of
the my Documents folder, so that I coudl use mkdir and the path, but the
problem is, the my document is mapped to the server, and not to the
C:\documents and settings subfolders.

Will appreciate if i could get some help on this.

I will eventually want to create folders within the new folder in the My
Documents.

Thank you!

Ali

Thank you!! This worked great!

"moi" wrote:

Use WSHost for getting the full MyDocuments path, change to that dir and
create a new folder.

Public Sub addMyDocumentsDir()
Dim wShell, fso, strFldr As String
Set wShell = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
strFldr = wShell.SpecialFolders("MyDocuments")
ChDir (strFldr)
fso.CreateFolder ("test123")
End Sub



"Ali" schreef in bericht
...
Hi,

I am trying to find out how to create a folder in the My Documents folder.

I tried looking for system variables that could lead me to the location of
the my Documents folder, so that I coudl use mkdir and the path, but the
problem is, the my document is mapped to the server, and not to the
C:\documents and settings subfolders.

Will appreciate if i could get some help on this.

I will eventually want to create folders within the new folder in the My
Documents.

Thank you!

Ali