anular botón cerrar

Gracias a Hector Miguel. C&P

1 - Insertar un modulo de codigo 'normal'

Public SePuedeSalir As Boolean

2 - En el modulo de codigo del libro [ThisWorkbook]

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Not SePuedeSalir Then Cancel = True
End Sub

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

SOLO cuando se seleccione unica/exclusivamente la celda 'D10'

Saludos. Pau
Si queréis usar mi dirección privada suprimir no.al.spam.gracias o sea
savrinor arroba hotmail punto com. Gracias.

"Diana Avruj" escribió en el mensaje
news:

Como podria anular el boton cerrar "x" de la hoja de excel desde una
aplicación VB?
Gracias

Pau,
Muchas gracias!! Funciona muy bien.
Saludos,
Diana

"Savrinor" <savrinor no al escribió en el mensaje
news:

Gracias a Hector Miguel. C&P

1 - Insertar un modulo de codigo 'normal'

Public SePuedeSalir As Boolean

2 - En el modulo de codigo del libro [ThisWorkbook]

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Not SePuedeSalir Then Cancel = True
End Sub

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

SOLO cuando se seleccione unica/exclusivamente la celda 'D10'

Saludos. Pau
Si queréis usar mi dirección privada suprimir no.al.spam.gracias o sea
savrinor arroba hotmail punto com. Gracias.

"Diana Avruj" escribió en el mensaje
news:

Como podria anular el boton cerrar "x" de la hoja de excel desde una
aplicación VB?
Gracias