Saltar al contenido

Copiar hoja en libro nuevo

publicado

Hola a todos en el foro, quisiera resolver un problema q tengo... de antemano gracias....explico:

quiero copiar una hoja de registro para un nuevo libro pero que el nuevo libro se guarde automaticamente con el nombre del empleado ej..... c:pedro.xlt

Featured Replies

publicado

Intenta con algo asi:

Sub CopySave()
Dim strFileName As String
strFileName = Hoja1.Range("B2").Value & ".xlt"
ActiveSheet.Copy
ActiveWorkbook.SaveAs strFileName
ActiveWorkbook.Close
End Sub

[/CODE]

publicado

Hola compañeros, en caso qde que quisieras guardarlo en un lugar determinado que habria que añadir?

publicado

Muchas gracias Armando, como siempre tus respuestas son las adecuadas. Eres un fenomeno.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.