no me funciona el codigo de error 18

13/11/2006 - 09:54 por isaac | Informe spam
tengo este codigo en objetos de excel "hoja2", no me detecta el error
18 que se da en otros modulos alguien sabe por que, gracias Isaac

Private Sub Worksheet_Calculate()
On Error GoTo uno
Application.EnableCancelKey = xlErrorHandler
uno:
If Err = 18 Then
MsgBox "USTED CANCELO LA EJECUCION DE LA MACRO"
'GoTo line15
End If
If Range("A233") = 1 Then bloquear_listas
End Sub
 

Leer las respuestas

#1 KL
13/11/2006 - 11:31 | Informe spam
If Err.Number = 18 Then...

Saludos,
KL


"isaac" wrote in message news:
tengo este codigo en objetos de excel "hoja2", no me detecta el error
18 que se da en otros modulos alguien sabe por que, gracias Isaac

Private Sub Worksheet_Calculate()
On Error GoTo uno
Application.EnableCancelKey = xlErrorHandler
uno:
If Err = 18 Then
MsgBox "USTED CANCELO LA EJECUCION DE LA MACRO"
'GoTo line15
End If
If Range("A233") = 1 Then bloquear_listas
End Sub

Preguntas similares