Excel - Problemas al cerrar un excel con formulario

Hola!

Esta vez tengo un formulario programado en el evento QueryClose con el siguiente código:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
On Error Resume Next
CloseMode = 0
Cancel = 1
CloseMode = 1
Application.DisplayAlerts = False
ActiveWorkbook.Save
Application.Quit
End Sub

Cuando ejecuto la macro en mi computador casero no hay ningún problema, pero cuando lo ejecuto en la oficina siempre me arroja la ventana de contraseña del proyecto VBA. (El código lo trabajo con protección para evitar posibles inconvenientes). El problema es que no se que tengo que hacer, las versiones de excel ambas son del 2010 y es el mismo sistema operativo: Window 7 Ultimate, entonces problemas de compatibilidad se descartan y como se pueden dar cuenta no hay error de sintaxis a menos que este equivocado, pero repito en mi computador casero funciona bien, ¿Habrá alguna forma en la que yo pueda hacer compatible dicho bloque sin problema alguno mediante codigo o configuración? , ¿Que podría estar pasando?. Les agradezco cualquier ayuda.

Gracias!!

Saludos!!!!

probé tu código -protegiendo el proyecto- en 2 pc diferentes y no tuve inconvenientes
te recomiendo que elimines la línea On Error Resume Next y que también depures el código
colocando un Break Point para ver si hay 'algo raro'... otra cosa no se me ocurre...

Saludos, desde Baires, JuanC

Tienes razón!

Ya lo hice y no se porque la linea de desactivar los displays de alerta estaba dando problemas, la borre y asunto terminado!

Gracias!!!!