Guardar hoja solo rango especifico en nuevo libro sin formulas

buenos dias amigo estoy usando una macro para guardar hoja activa de un libro la macro es excelente ya que ejectuta todo lo que necesito y guarda en la ruta que quiero, el detalle es que esta guardando la hoja con las formulas y botones que ya existen en ella, y solo quiero que guarde la hoja pero en un rango especifico que seria "A1:V100"

la macro es la siguiente:

Sub GUARDAR_NOMINA()

    Dim fileSaveName As Variant

    Dim filePath As String

    Application.ScreenUpdating = False

    If MsgBox("Esta seguro de Guardar la Nomina?", vbYesNo) = vbNo Then

        Exit Sub

    End If

    filePath = "Z:\Relacion laboral\GUARDERIA\"

    Sheets("NOMINA").Copy

    fileSaveName = InputBox("Coloque Nombre a la Nomina", "información")

    If LTrim(RTrim(fileSaveName)) <> "" Then

        Application.DisplayAlerts = False

        ActiveWorkbook.SaveAs Filename:=filePath & "  " & fileSaveName

        Application.DisplayAlerts = False

        MsgBox "Guardado de la Siguiente Manera:" & Chr(13) & Chr(13) & _

                ActiveWorkbook.Name & _

                ActiveWorkbook.Path

    Else

        MsgBox "Proceso Interrumpido la Nomina no fue Guardada."

    End If

    ActiveWorkbook.Close False

    Application.ScreenUpdating = False

End Sub[/CODE]

gracias por su ayuda

NOMINA.rar