Macro to copy sheet in New Workbook and name it by cell value derivative in a specified folder

[Antonescu]

Hello,

Sorry if this was asked before, but I haven't found this specific set of command, nor managed to adapt it. So here goes:
I want to:
1. Copy a sheet intro a new workbook, then
2. Save that file in a specific folder
3. With a name that contains a fixed part "Nume", a cell value and another fixed part "Prenume"

I have the code below and basically it just the 3rd point I'm having trouble with. In the code, I want the bolded A1, to be the actual value in cell A1.

Sub Fisier()
'
' Fisier Macro
'

'
Sheets("extract").Select
Sheets("extract").Copy
ChDir "C:\Users\AntonG\Desktop"
ActiveWorkbook.SaveAs Filename:= _
"C:\Users\AntonG\Desktop\Nume A1 Prenume.xlsx", FileFormat:=xlOpenXMLWorkbook _
, CreateBackup:=False
Application.WindowState = xlNormal
End Sub

I'd be so grateful for an idea.
Thank you!

 

[Fluff]

How about

Sub Fisier()
'
' Fisier Macro
'

'
Sheets("extract").Copy
ChDir "C:\Users\AntonG\Desktop"
ActiveWorkbook.SaveAs FileName:= _
"C:\Users\AntonG\Desktop\Nume " & Range("A1").Value & " Prenume.xlsx", FileFormat:=xlOpenXMLWorkbook _
, CreateBackup:=False
Application.WindowState = xlNormal
End Sub

 

[Fluff]

Duplicate to: Macro to make new workbook saved as "Fixed name & cell value"

In future, please do not post the same question multiple times. Per Forum Rules (#12), posts of a duplicate nature will be locked or deleted.

In relation to your question here, I have closed this thread so please continue in the linked thread.