salvar copia de hoja desde una macro.

Hola Dr_Rodriguez,

Mostrar la cita

necesito la instruccion para
hacerla como una macro activada desde un botón, que no esta en la hoja
desde
doned lo activo

sinceramente esta frase no la acabo de entender. ?podrias reformualrlo
porfa?

Mostrar la cita

Tengo en una celda la siguiente formula: =concatenar(h2,"\"h3) que trae
como
resultado: x:uta_de_directorioombre
donde h2 es la ruta y h3 es el nombre que quisiera para el archivo.

Suponiendo que:

1) en la celda [A1] de la hoja "Hoja1" tienes la formula:
=H2&"\"&H3
(la funcion CONCATENAR se sustituye facilmente con el operador &)
3) el boton que ejecuta el macro esta en la misma hoja
4) quieres salvar copia de la "Hoja2" en un libro nuevo con la ruta y el
nombre que aparecen en la celda [A1] de la hoja "Hoja1"
5) la ruta que aparece en la celda [A1] de la hoja "Hoja1" ya existe en tu
sistema

prueba asignar a tu boton el siguiente codigo y colocarlo en un modulo VBA
estandar (no de hoja, thisworkbook o formulario)

Sub Test()
With ThisWorkbook
Nombre = .ActiveSheet.Range("A1")
.Sheets("Hoja2").Copy
End With
ActiveWorkbook.SaveAs Nombre
End Sub

Saludos,
KL