VBA not working

.
Rather than the Sheet Level module, here is another project using a regular module :

Option Explicit

Sub CreateNew()
Dim wsRecipes As Worksheet, wsTEMP As Worksheet, wasVISIBLE As Boolean
Dim shNAMES As Range, Nm As Range
Dim i As Long
Dim wsIndex

On Error Resume Next


With ThisWorkbook                                               'keep focus in this workbook
    Application.CopyObjectsWithCells = False
        Set wsTEMP = .Sheets("Template")                            'sheet to be copied
        wasVISIBLE = (wsTEMP.Visible = xlSheetVisible)              'check if it's hidden or not
        If Not wasVISIBLE Then wsTEMP.Visible = xlSheetVisible      'make it visible
          
        Application.ScreenUpdating = False                          'speed up macro
    
        wsTEMP.Copy After:=.Sheets(.Sheets.Count)                   '...create it from template
        
        wsIndex.Activate                                            'return to the master sheet
        If Not wasVISIBLE Then wsTEMP.Visible = xlSheetHidden       'hide the template if necessary
        Application.ScreenUpdating = True                           'update screen one time at the end
    
    Application.CopyObjectsWithCells = True
End With
Sheets(Sheets.Count).Select

Dim tabname As String
tabname = Sheets("Template").Range("A5").Value
ActiveSheet.Name = tabname
ActiveSheet.Range("A5").Value = ""
Sheets("Template").Range("A5").Value = ""
MsgBox "New sheet created. "
Exit Sub
End Sub

Logit: The bottom part of the code is for the sheet name to equal "A5" but it doesn't want to work. I saved the file first. Do I need to run something?

Peter

Did you try my code?

Yes, I just hadn't responded on yours yet. Your code works fine. The second response from Logit included a button to add additional sheets with the same layout. The button works but the sheet name "A5" doesn't.
Sorry to refer to another person's post. Still stuck.

.
Strange. It works here as written in the sample workbook posted.

Did I misunderstand your goal ? You have a TEMPLATE sheet. In A5 you enter the name of the sheet to be created by the TEMPLATE macro.
The sheet is created and the tab has the name that was entered in A5 on the TEMPLATE sheet.

???

I think I know why then. I was entering the sheet name in A5 thinking the template sheet would change. My bad. It works great!! Much appreciated.

Hello Jeffrey. I want to make the adjustments but would you mind providing more clarity as to which part of the rule(s) you are referring to?

.
You are very welcome.