Guardar hoja solo rango especifico en nuevo libro sin formulas

[yordin]

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