Macro/VBA script needed to prompt user to save file to specific path, using specific cell reference for name

[lsomoza]

I have been trying to find a macro/VBA script for this, but have not been able to.

Basically, I want the user to be able to save an excel workbook using a pre-formatted name referenced from a cell, and be prompted to selected the path.

I am using excel 2016.

I have tried a few that I have found, but none seem to work.

Thanks in advance.

 

[DanteAmor]

Hi and welcome to MrExcel

Check if the following is what you need

Sub SaveFile()
  Dim sFile As String, sPath As String
  
  sFile = Sheets("Sheet1").Range("A2").Value
  With Application.FileDialog(msoFileDialogFolderPicker)
    .Title = "Select Folder"
    .AllowMultiSelect = False
    If .Show <> -1 Then Exit Sub
    sPath = .SelectedItems(1)
  End With

  ThisWorkbook.SaveCopyAs sPath & "\" & sFile & ".xlsm"
End Sub