Like this 
Sub SheetsFromTemplate()
Dim wsMASTER As Worksheet, wsTEMP As Worksheet, wasVISIBLE As Boolean
Dim shNAMES As Range, Nm As Range
Dim i As Long

With ThisWorkbook                                               'keep focus in this workbook
    Set wsTEMP = .Sheets("Template")                            'sheet to be copied
    Set wsMASTER = .Sheets("Tender Form")                       'sheet with names
                                                                'range to find names to be checked
    Set shNAMES = wsMASTER.Range("A12:A" & Rows.Count).SpecialCells(xlConstants)     'or xlFormulas
    
    Application.ScreenUpdating = False                              'speed up macro
    i = 2
    For Each Nm In shNAMES
         i = i + 1
        If Not Evaluate("ISREF('" & CStr(Nm.Text) & "'!A1)") Then
            wsTEMP.Copy after:=.Sheets(i)
            ActiveSheet.name = CStr(Nm.Text)
        End If
    Next Nm
    
    Application.ScreenUpdating = True                           'update screen one time at the end
End With


MsgBox "All sheets created"
End Sub