Deshabilitar el boton [X]

Hola dargento,

Revisa esto: http://support.microsoft.com/kb/107689/es

y esto: http://support.microsoft.com/kb/q117855/

Creo que una combinacion de recortes de ambas soluciones hara lo que buscas.

Saludos,
KL


"dargento" wrote in message
news:

Hola!
Me gustaria saber como puedo hacer para que durante la ejecucion de mi
aplicacion en excel con codigo visual basic, no me puedan cerrar excel
desde el boton cerrar de la X, para los formularios ya se hacerlo
pero,pero para excel entero no.
Gracias


dargento

dargento's Profile: http://www.msusenet.com/member.php?userid47
View this thread: http://www.msusenet.com/t-1870558761

hola, Desiree !

... que durante la ejecucion de mi aplicacion en excel con codigo visual basic
no me puedan cerrar excel desde el boton cerrar de la X
para los formularios ya se hacerlo pero,pero para excel entero no.

si lo [unico] que necesitas es la 'funcionalidad' de que el usuario 'tenga que...' salir segun [tu] 'lo permitas'...
[solo] se necesitan 3 'instrucciones' en tu proyecto de macros...
1) declarar una variable 'publica' de tipo 'boolean' [verdadero/falso]
[de preferencia] en un modulo de codigo 'normal' [para que sea 'transparente' para todo modulo]
2) una linea que establezca dicha variable en 'verdadero' [o falso segun como/cuando la quieras utilizar]
3) una linea en el evento '_beforeclose' del libro para que 'mientras la variable no lo permita'... no se pueda salir :))

te paso un ejemplo al final
si cualquier duda... comentas?
saludos,
hector.

-linea 1- en un modulo de codigo 'normal' ==Public SePuedeSalir As Boolean ' al abrirse el libro se establece por omision en FALSO ;)
-linea 2- en el modulo de codigo del libro [ThisWorkbook] ==Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Not SePuedeSalir Then Cancel = True
End Sub
-linea 3- en el modulo de codigo de la hoja 1 ==Private Sub Worksheet_SelectionChange(ByVal Target As Range)
SePuedeSalir = (Target.Address = "$D$10")
End Sub

-> [p.e.] si quisieras 'dar permiso' SOLO cuando se seleccione unica/exclusivamente la celda 'D10' <-
-> obviamente puedes modificar el valor de la variable desde cualquier linea y procedimiento necesario
[p.e. como primera linea en el procedimiento que asignes a algun boton para tal fin] ;)