............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Mantener activo un form cuando se produzca un error

Ver el tema anterior Ver el tema siguiente Ir abajo

Mantener activo un form cuando se produzca un error

Mensaje por Jose BN el Miér Jun 01, 2011 9:11 pm


Foreros cuento con un form que cuenta con un boton que guarda una copia de un reporte ejecutado en una hoja de calculo, como se puede evitar que si el usuario cambia la ruta o elima el archivo llamado Libro1 evite activar el depurador de VB, ya que al activarse y finalizar el mensaje de error se tiene acceso al libro fuente y lo que pretendo es eviatr este acceso y se continue activo el form ya que este cuenta con el siguiente codigo:

Private Sub Workbook_Open()

Application.Visible = False
Pantallazo.Show


End Sub

Codigo del boton que realiza el guardar.
Private Sub GUARDAR_Click()

Workbooks.Open ("C:\Users\Jose Balladares\Desktop\1GB\REV\ACTUALIZACION 21 ABRIL\BIBLIOTECA\Libro1.xls")

Jose BN

Masculino Cantidad de envíos : 57
Edad : 36
Ciudad - Pais : Costa Rica-San Jose
Version de Excel : 2003, Vista, 2007
Fecha de inscripción : 16/05/2011

Volver arriba Ir abajo

Re: Mantener activo un form cuando se produzca un error

Mensaje por rolano el Miér Jun 01, 2011 10:40 pm

HOla Jose pueda que te sirva el On error resume next
Código:

On Error Resume Next
Workbooks.Open ("C:\Users\Jose Balladares\Desktop\1GB\REV\ACTUALIZACION 21 ABRIL\BIBLIOTECA\Libro1.xls")

_________________
Saludos,
César Tirado
M.A.P. 2012-2014
Microsoft Active Professional
Blog

rolano
Moderador
Moderador

Masculino Cantidad de envíos : 53
Edad : 43
Fecha de inscripción : 14/04/2009

http://excelilove.blogspot.com/

Volver arriba Ir abajo

Re: Mantener activo un form cuando se produzca un error

Mensaje por GalileoGali el Jue Jun 02, 2011 6:53 pm

Si no entendi mal este serái un caso par el Evento Before Save

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional

GalileoGali
Admin

Masculino Cantidad de envíos : 1962
Edad : 61
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: Mantener activo un form cuando se produzca un error

Mensaje por Jose BN el Jue Jun 02, 2011 8:24 pm

rolano voy a probar tu recomendación y te comento, por otra parte Galileo el evento before save Se produce antes de que el libro se guarde y se pide confirmación al usuario antes de guardar el libro.

Lo que pasa es que el archivo siempre se guarda bajo este codigo:
For Each w In Application.Workbooks
w.Save
Next w
Application.Quit
y lo que busco es que si la ruta del archivo cambia o bien se borra el archivo, al no encontrarlo devuelva la ejecución del codigo al inicio, evitandose el depurador de VB y se habilite el libro manteniendose activo el form, nunca he hecho esto pero me gustaria conocer si es posible lograrlo.

Jose BN

Masculino Cantidad de envíos : 57
Edad : 36
Ciudad - Pais : Costa Rica-San Jose
Version de Excel : 2003, Vista, 2007
Fecha de inscripción : 16/05/2011

Volver arriba Ir abajo

Re: Mantener activo un form cuando se produzca un error

Mensaje por Jose BN el Jue Jun 02, 2011 10:51 pm

Gali agradezco tus comentarios la solución que necesitaba la resolvi con:
On Error GoTo ErrorHandler
Exit Sub
ErrorHandler:
'MsgBox Err.Description, vbCritical, "Error"
End Sub

Pero para mi caso no deseo que muestre el mensaje de error, por lo que no es necesario el Msgbox. De todas formas muchas gracias por el tiempo que le dieron a mi consulta.

Saludos

Jose BN

Masculino Cantidad de envíos : 57
Edad : 36
Ciudad - Pais : Costa Rica-San Jose
Version de Excel : 2003, Vista, 2007
Fecha de inscripción : 16/05/2011

Volver arriba Ir abajo

Re: Mantener activo un form cuando se produzca un error

Mensaje por Contenido patrocinado Hoy a las 1:55 am


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.