View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default Make a directory on the fly

Just trap the error - less work than testing.

On Error Resume Next
mkdir "C:\MyDirectory"
On Error goto 0

If your directory is several levels, then you might need to work down the
structure

On Error Resume Next
mkdir "c:\Level1"
mkdir "c:\Level1\Level2"
mkdir "c:\Level1\Level2\Level3"
On Error goto 0

If there might be a problem with permissions, then you might need to check
for the existence after the above.

--
Regards,
Tom Ogilvy



Jonefer wrote in message
...
I'm trying to write a vb routine that will save a file in
a certain directory. I want to test for the existence of
the directory and create it if it doesn't exist, before
saving the file.

please help?
Thanks