title: Cannot save file in Excel after using filesavename in VBA
body: <p>So i have this VBA at work, that I made a while ago. It used to work perfectly, but as of today it will not save my file after it opens the Save as window. It just goes to the MsgBox ive given it.</p>
  
  <p>At first the problem was that LDate = Date somehow started returning the date with a forward slash. Ive fixed this by adding a format for LDate. But the bigger problem remains. No matter what i do, what code i remove or add, what name i write manually, the file wont save in any folder i give it.</p>
  
  <pre><code>Sub Export()
  '
  ' Export Macro
  '
      ' copy range from work workbook, create a new workbook and paste selection
      Sheets("NewTemplate").Range("A1:M29").Copy
      Workbooks.Add
      Range("A1").Select
      Selection.PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, _
          SkipBlanks:=False, Transpose:=False
      ActiveSheet.Paste
  
      ' rename active sheet and active workbook
      ActiveSheet.Name = "Create"
      ActiveWorkbook.Windows(1).Caption = "Newly Generated Table"
      Range("A1").Select
       Application.CutCopyMode = False
  
      ' open Save As window, set file save name to custom prefix + date
      Dim IntialName As String
      Dim fileSaveName As Variant
      InitialName = "Import_Feature_Values_"
      Dim LDate As String
      LDate = Date
      LDate = Format(Now, "dd_mm_yyyy")
      fileSaveName = Application.GetSaveAsFilename(FileFilter:= _
                                                   "Microsoft Excel Macro- Enabled Worksheet (*.xlsm), *.xlsm", InitialFileName:=InitialName &amp; LDate)
  
      'error box if filesavename fails
      If fileSaveName &lt;&gt; False Then
      MsgBox "Failed to Save as " &amp; fileSaveName
      End If
  '
  End Sub
  </code></pre>