VBA Code for Access Command Button to Create a New File Folder

[Derek280zx]

I have an Access Data base with a given form that creates a new recorded with the Prime Key called (MDR#). I want to add a command button to the bottom of the form so when they click on it, it will create a folder in a given location (On the network) with the folder labeled with the "MDR# (MDR# from table)".

I also would like for it to look and verify that there is not already a folder with that MDR#.

Also if possible I would like to create another command button on a given form that will open the folder dedicated to that MDR#.

Is any of this possible?

Can someone help me with the coding. I am new with access and VBA.

 

[Russell Hauf]

Hi Derek,

This is definitely possible. I am assuming that you know how to put VBA behind the command buttons.

First, to make a folder given that one does not exist, I'd do something like this (please note that I am assuming that you will concatenate a path with your MDR# - make sure you add the slash between the existing path and the new - or existing - folder):

If Dir(strSomePath & <*MDR# - you need to do this part *>, vbDirectory) > vbNullString Then
    ' do nothing
Else
    MkDir strSomePath & <*MDR#*>
End If

(you could also encapsulate that into its own subroutine)

To open the folder from a command button, you might do something like this:

Shell strSomePath & <*MDR#*>, vbNormalFocus

Happy coding,

 

[Darren Bartrup]

Hi Derek,

This thread here should give you the code:
http://www.mrexcel.com/forum/excel-questions/663730-macro-check-create-folder-structure-save.html