Guardar Plantilla

Solo consultas sobre macros y código VBA Excel.

Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Compartir en:
     

Guardar Plantilla

Notapor rebliwbel » 13 Sep 2006 11:00

Hola, Tengo una plantilla llamada Precios.xlt, pero cada semana tengo que actualizar los precios, para guardar los precios ya actualizados siempre sigo manualmente los siguientes pasos:
a) Archivo - Guardar como..
b) Selecciono la ruta y el tipo de archivo (plantilla)
c) Escribo el nombre de "Precios"
d) Me pregunta "El archivo Precios.xlt" ya existe, desea reemplazarlo??
e) Presiono el botón de SI

Para no repetir todos éstos pasos utilice la siguiente macro:

Sub guardar ()
ActiveWorkbook.Save
ActiveWorkbook.Close
End sub

Pero no funciona, sólo funciona si es un archivo XLS, me podrí­an ayudar con una macro para guardar una plantilla XLT sin que me preguntara "El archivo Precios.xlt" ya existe, desea reemplazarlo????
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
rebliwbel
Miembro Frecuente
Miembro Frecuente
 
Registrado: 10 Jun 2006 06:51

Re: Guardar Plantilla

Notapor Danlev » 13 Sep 2006 16:33

rebliwbel, en tu procedimiento agrega los textos en azul

Sub guardar ()
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs FileFormat:=xlTemplate
Application.DisplayAlerts = False
ActiveWorkbook.Close
End sub

Espero te sea de utilidad

Saludos
Danlev
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
Danlev
Miembro Frecuente
Miembro Frecuente
 
Registrado: 22 Jul 2005 23:23
Ubicación: Lima, Peru

Re: Guardar Plantilla

Notapor rebliwbel » 13 Sep 2006 17:29

Gracias, el procedimiento si funciona, pero lo guarda en otra ruta y como precios1.xlt
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
rebliwbel
Miembro Frecuente
Miembro Frecuente
 
Registrado: 10 Jun 2006 06:51

Re: Guardar Plantilla

Notapor Danlev » 15 Sep 2006 13:38

rebliwbel, los archivos Plantilla se guardan por defecto en una caperta definida por el office, pero con el siguiente codigo puedes personalizar la ruta y el nombre

Sub guardar ()
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs _
Filename:="C:\...completa tu ruta aqui...\Precios.xlt", _
FileFormat:=xlTemplate
ActiveWorkbook.Close
End Sub

Espero te sea de utilidad

Salud2
Danlev
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
Danlev
Miembro Frecuente
Miembro Frecuente
 
Registrado: 22 Jul 2005 23:23
Ubicación: Lima, Peru

Re: Guardar Plantilla

Notapor rebliwbel » 15 Sep 2006 15:13

Gracias Danlev, mucho mejor.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
rebliwbel
Miembro Frecuente
Miembro Frecuente
 
Registrado: 10 Jun 2006 06:51


Compartir en:
     

  • Anuncio
Manual Excel avanzado

Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: Bing [Bot], Google [Bot] y 9 invitados