¿desea guardar cambios?

Hola Pasarin

Puedes probar con algo como esto

sub cerrar()
Workbooks("fichero_no_guardar.xls").Close SaveChanges:=False
Workbooks("fichero_si_guardar.xls").Close SaveChanges:=True
end sub

prueba a ver si funciona.

un saludo

Javi

pasarin escribió:

Hola , tengo una macro que abre y cierra varios ficheros. Cuando la ejecuto,
a la hora de cerrar los ficheros se interrupe la ejecución para preguntarme
si quiero guardar los cambios. Quisiera evitar la interrupción y el riesgo
de una respuesta no deseada. ¿que codigo VB tendría que escribir para que el
usuario no tenga que contestar nada y por tanto no se interrumpiese le
ejecución de la macro?
Gracias y Saludos.

Perfecto gracias. ¿Y cuando la macro se para porque esoty renombrando un
fichero con un nombre que ya existe y me pregunta si quiero "pisarlo" que
codigo añado a esto?
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Luis Menendez\Escritorio\CONSOLIDADO
EMBAT.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

Gracias y saludos.


"javi" escribió en el mensaje
news:

Hola Pasarin

Puedes probar con algo como esto

sub cerrar()
Workbooks("fichero_no_guardar.xls").Close SaveChanges:=False
Workbooks("fichero_si_guardar.xls").Close SaveChanges:=True
end sub

prueba a ver si funciona.

un saludo

Javi

pasarin escribió:

Hola , tengo una macro que abre y cierra varios ficheros. Cuando la
ejecuto, a la hora de cerrar los ficheros se interrupe la ejecución para
preguntarme si quiero guardar los cambios. Quisiera evitar la
interrupción y el riesgo de una respuesta no deseada. ¿que codigo VB
tendría que escribir para que el usuario no tenga que contestar nada y
por tanto no se interrumpiese le ejecución de la macro?
Gracias y Saludos.

Application.DisplayAlerts=False

"pasarin" escribió en el mensaje
news:

Perfecto gracias. ¿Y cuando la macro se para porque esoty renombrando un
fichero con un nombre que ya existe y me pregunta si quiero "pisarlo" que
codigo añado a esto?
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Luis Menendez\Escritorio\CONSOLIDADO
EMBAT.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

Gracias y saludos.


"javi" escribió en el mensaje
news:

Hola Pasarin

Puedes probar con algo como esto

sub cerrar()
Workbooks("fichero_no_guardar.xls").Close SaveChanges:=False
Workbooks("fichero_si_guardar.xls").Close SaveChanges:=True
end sub

prueba a ver si funciona.

un saludo

Javi

pasarin escribió:

Hola , tengo una macro que abre y cierra varios ficheros. Cuando la
ejecuto, a la hora de cerrar los ficheros se interrupe la ejecución para
preguntarme si quiero guardar los cambios. Quisiera evitar la
interrupción y el riesgo de una respuesta no deseada. ¿que codigo VB
tendría que escribir para que el usuario no tenga que contestar nada y
por tanto no se interrumpiese le ejecución de la macro?
Gracias y Saludos.

Muchas Gracias
"Manuel Romero" escribió en el mensaje
news:

Application.DisplayAlerts=False

"pasarin" escribió en el mensaje
news:

Perfecto gracias. ¿Y cuando la macro se para porque esoty renombrando un
fichero con un nombre que ya existe y me pregunta si quiero "pisarlo" que
codigo añado a esto?
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Luis Menendez\Escritorio\CONSOLIDADO
EMBAT.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

Gracias y saludos.


"javi" escribió en el mensaje
news:

Hola Pasarin

Puedes probar con algo como esto

sub cerrar()
Workbooks("fichero_no_guardar.xls").Close SaveChanges:=False
Workbooks("fichero_si_guardar.xls").Close SaveChanges:=True
end sub

prueba a ver si funciona.

un saludo

Javi

pasarin escribió:

Hola , tengo una macro que abre y cierra varios ficheros. Cuando la
ejecuto, a la hora de cerrar los ficheros se interrupe la ejecución
para preguntarme si quiero guardar los cambios. Quisiera evitar la
interrupción y el riesgo de una respuesta no deseada. ¿que codigo VB
tendría que escribir para que el usuario no tenga que contestar nada y
por tanto no se interrumpiese le ejecución de la macro?
Gracias y Saludos.