title: VBA - How to create new folder and sub folders and save the workbook
body: <p>I am trying to save my workbooks with a button click, that directs the workbook to 2016 folder and few region subfolders like LA, NY, Denver, Chicago (which ever location, user selects). But as moving forward, I am trying to broaden the scope of my excel tool, such that through the same button click, workbook should be able to create folders and then sub folders and save the workbook over there. for eg., currently it should create folder for 2016 and the desired "region" subfolder that the user is working. I have additionally managed the year value from the user in the worksheet which would be in cell "D11". </p>
  
  <p>Any help is much appreciated. Thanks a lot ! </p>
  
  <pre><code> location = Range("D9").Value
   FileName1 = Range("D3").Value
  
    If location = "Chicago" Then
  
       ActiveWorkbook.SaveAs FileName:="S:\Audits\2016\Chicago - 07\" &amp; FileName1 &amp; "-" &amp; "Audit checklist" &amp; ".xlsm"
  
       ElseIf location = "Los Angeles" Then
       ActiveWorkbook.SaveAs FileName:="S:\Audits\2016\Los Angeles\" &amp; FileName1 &amp; "-" &amp; "Audit checklist" &amp; ".xlsm"
  
       ElseIf location = "New York" Then
       ActiveWorkbook.SaveAs FileName:="S:\Audits\2016\New York - 08\" &amp; FileName1 &amp; "-" &amp; "Audit checklist" &amp; ".xlsm"
  
       Else
       ActiveWorkbook.SaveAs FileName:="S:\Audits\2016\Atlanta\" &amp; FileName1 &amp; "-" &amp; "Audit checklist" &amp; ".xlsm"
  </code></pre>