In the workbook code area place this ........


Private Sub Workbook_Open()
If Dir("C:\Business Cases\", vbDirectory) = "" Then MkDir "C:\Business
Cases"
End Sub


--
Cheers
Nigel



"peter.thompson"
<peter.thompson.21m19a_1137217802.0932@excelforu m-nospam.com wrote in
message news:peter.thompson.21m19a_1137217802.0932@excelfo rum-nospam.com...

When a workbook is opened for the first time, I want to automate the
creation of a "Business Cases" folder on the user's C drive.

Can anyone guide me with the required code to:

Test if "C:/Business Cases" exists, and if it doesn't create the
folder

Any assistance much appreciated

Cheers

Peter (new to VBA...slowly getting there...)


--
peter.thompson
------------------------------------------------------------------------
peter.thompson's Profile:
http://www.excelforum.com/member.php...o&userid=29686
View this thread: http://www.excelforum.com/showthread...hreadid=501311