GUARDAR COPIA

[SALAVERRINO]

Buenas tardes, tengo un pequeño problema con esta Macro, tengo un archivo plantilla (archivo adjunto) y con esta macro GUARDAR COPIA el cual me permite generar otro archivo con un nombre distinto...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[renzo palacios]

buen día,

Adicionale este codigo

Dim lastRow%
lastRow = Sheets("planilla (2)").Cells(Rows.Count, 1).End(xlUp).Row
Sheets("planilla (2)").Range(Cells(8, 1), Cells(lastRow...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[renzo palacios]

perdon estecodigo

Dim lastRow%
lastRow = Sheets("planilla").Cells(Rows.Count, 1).End(xlUp).Row
Sheets("planilla").Range(Cells(8, 1), Cells(lastRow, 50)).ClearContents

 

[SALAVERRINO]

Bs, ds, amigo renzo palacios, la macro esta excelente, pero hay un detalle que al momento de ejecutar la macro con el aporte que haz enviado borra los datos del archivo original (archivo de...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jorgelin]

Hola (salaverrino y Renzo). Revisa esta conversación y te darás una idea para lo que necesitas

https://www.todoexcel.com/foro-excel/macros/macro-para-salvar-libro-abierto-t31349.html...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[renzo palacios]

Buen día,

Creo que tu macro quedaria asi

Sub guardar()

nombre = ActiveWorkbook.Name
carpeta = ActiveWorkbook.Path
filaa = carpeta & "\" & nombre

nombrar = MsgBox("usar...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[renzo palacios]

cambial la linea

Workbooks(Nombre).Close savechanges:=fals


por

Workbooks(Nombre).Close savechanges:=True

 

[SALAVERRINO]

Bs. ns, amigo renzo palacios, todo la rutina esta perfecta con la ultima modificación que haces, pero el archivo plantilla no debe quedar con los datos, para mejor detalle adjunto un archivo con...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[renzo palacios]

buen día,

Discúlpame no entiendo a que te refieres, inicialmente entendía que el archivo nuevo quedaba con los datos de la plantilla, ahora me indicas que ni el archivo nuevo ni la plantilla...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[SALAVERRINO]

Bs ds. amigo renzo, tu macro esta ok,

Lo que tu indicas "inicialmente entendía que el archivo nuevo quedaba con los datos de la plantilla", y así es, pero a su vez el archivo plantilla debería...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[SALAVERRINO]

Amigo renzo, trata de ejecutar el archivo y veras que tanto el archivo plantilla como el nuevo archivo, tendran los datos iguales.

 

[renzo palacios]

como deberia quedar y que tocaria quitar.

 

[SALAVERRINO]

bs ts. renzo, el archivo debe quedar "archivo de guardar como" (plantilla en blanco) y archivo nuevo con los datos que tiene el archivo plantilla.

gracias

 

[renzo palacios]

bueno,

Espero haber entendido.

 

[SALAVERRINO]

Ahora si le atinaste al requerimiento amigo renzo palacios, por lo que agradezco tu paciencia y compartir tus conocimiento con los usuarios como yo, requieren de vuestra ayuda.

 

[SALAVERRINO]

Bs ts. amigo renzo palacios, ya estoy ejecutando la macro que me enviaste y todo esta perfectamente trabajando, solo un pequeño detalle que creo que se me paso por alto indicar, es que en el...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí