Newly Created Sheets Replacing Existing

I have a novice question...

How would I create a macro that copies a template and creates a new sheet from it? I have the basics down, but the template has values that carry through to the copies, thus creating duplicates. How would I specify to copy the values only, and not the code?
____________________________________

Sub CopyTemp()
'
' CopyTemp Macro
'

'
    Sheets("Template").Select
    Sheets("Template").Copy After:=Sheets(3)
    Dim Newname As String
    Newname = InputBox("Insert Date (MM-DD-YY)")
     If Newname <> "" Then
      ActiveSheet.Name = Newname
  End If

End Sub

______________________________________________________