I am trying to save a new workbook with only one sheet in it with:
Then![]()
set ws = ThisWorkbook.Sheets(1) SheetName = ws.Name ws.Copy
But the Sheet name remains the FileName How do you change the Sheet Name?![]()
'~save book in this folder ActiveWorkbook.SaveAs FileName:=MyFilePath2 & "\" & SheetName & "_" & "BasePop_&_Connctions" & "_" & Format(Now(), "DD-MM-YY hh.mm") & ".csv", FileFormat:=6 Application.Sheets(1).Name = "New Name" ActiveWorkbook.Close SaveChanges:=True
Thanks
Bookmarks