Guardar hoja

hola, Regatin !

... guardar una hoja de forma automatica (al pulsar un boton) con el valor de una celda.

-> suponiendo que la hoja que quieres guardar es la hoja 'activa' del libro 'activo'
y en la celda [A1] tiene el nombre con el que lo vas a guardar
[suponiendo que la celda [A1] INCLUYE ruta y nombre p.e. c:\carpeta Xombre libro nuevo]
[y suponiendo tambien que en un libro 'nuevo']
un procedimiento [de entre varias formas mas] pudiera ser +/- como el siguiente:
asigna una macro que pongas en un modulo de codigo 'normal' al 'boton' ==Sub GuardarHojaActiva()
ActiveSheet.Copy
ActiveWorkbook.SaveAs Range("a1")
ActiveWorkbook.Close
End Sub

esta 'forma' [aunque es tan 'sencilla' como tu consulta] tiene ALTAS PROBABILIDADES DE FALLA [p.e.]
- si el nombre es 'valido' [o no]... si el nombre [siendo valido] YA existe [o no] donde se va a guardar... etc.
- si la hoja ES la que contiene 'el boton'... [dicho boton tambien] en el nuevo libro 'tratara' de ejecutar el mismo codigo

[en resumen] si especificas con mas 'claridad' los detalles que se te estan 'quedando en el tintero'...
se podria proponer opciones mas adecuadas ;)

comentas datos adicionales?
saludos,
hector.