Macro para guardar en Diskettera

03/05/2005 - 00:21 por Rene Palacios | Informe spam
Hola estuve probando con la grabadora de macros pero no me salio bien, espero
me puedan ayudar a crear una macro q automaticamente me guarde en La
disketter (A:) la hoja del libro donde estoy trabajando, tengo varias hojas
en las q trabajo al dar click q esa hoja se guarde en A:

Gracias por su ayuda de antemano
 

Leer las respuestas

#1 KL
03/05/2005 - 01:11 | Informe spam
Hola Rene,

Prueba esto:

Sub GuardarHoja()
ActiveSheet.Copy
With ActiveWorkbook
.SaveAs "A:\" & ActiveSheet.Name & ".xls"
.Close
End With
End Sub

Saludos,
KL


"Rene Palacios" wrote in message
news:
Hola estuve probando con la grabadora de macros pero no me salio bien,
espero
me puedan ayudar a crear una macro q automaticamente me guarde en La
disketter (A:) la hoja del libro donde estoy trabajando, tengo varias
hojas
en las q trabajo al dar click q esa hoja se guarde en A:

Gracias por su ayuda de antemano

Preguntas similares