title: Trying to save workbook to a folder specified by the user
body: <p>Hi there I am trying to make a macro that saves a report to a specific folder. Our folders get generated every day like <code>C://Report_Type/2017/11/10</code> (where <code>/10</code> is the folder I'd want to save the file to). </p>
  
  <p>The code I have prompts the user to provide the date in order to have the folder located, and then it saves the file according to a specified name. </p>
  
  <p>However when I run the macro it saves the file in the <code>C://Report_Type/2017/11</code> root folder ignoring the day based on userinput. Could someone help where I got it wrong? </p>
  
  <p>It's a bit complicated to explain, but if you check the code then it makes sense. </p>
  
  <pre><code>Sub PSSaveFile()
      Dim myVal2 As Variant
      Dim myDate As String
      Dim mFilePath As String
  
      myVal2 = InputBox("Please enter today's date in mm\dd format")
      myDate = Date - 1
      mFilePath = "\\sample\sample_emea\sec_REPORTS\APPS\Reports\Regional\sample_security_app\2017\" &amp; myVal2
  
      ActiveWorkbook.SaveAs FileName:=mFilePath &amp; "SampleLogs-" &amp; myDate &amp; "-12352_checked"
  End Sub
  </code></pre>
  
  <p>Thank you for the help in advance!</p>