Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

problema con Exit Sub

05/03/2009 - 10:12 por Juan Español | Informe spam
Ayuda Hacer una pregunta
una ayudita porfa...

Tengo este pequeño código en un botón de la hoja L_PESOS

Private Sub IM_TK_Click()
Application.ScreenUpdating = False
Sheets("TK").Select
If Range("B10").Value = 0 Then Exit Sub

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("L_PESOS").Select
Application.ScreenUpdating = True
End Sub

Y al ejecutarlo me imprime la hoja aunque el valor de B10 sea cero

Y lo más curioso es que probando en la ventana de inmediato:
?Range("B10").Value respuesta: 0
If Range("B10").Value = 0 Then Debug,Print "el valor de B10 es cero"
Respuesta: el valor de B10 es cero

Por lo que deduzco que "Exit Sub" no funciona.

Y aquí la pregunta, ¿por qué podría ser?.

Saludos.
email Siga el debateRespuesta 4 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 L. Garcia
05/03/2009 - 10:19 | Informe spam
Hola:

La verdad, ni idea, pero si parece que no funciona el exit sub ¿?, y además
tienes un ScreenUpdating 'colgado' (lo pones a False, pero luego no lo
vuelves a poner a True)... yo cambiaría la lógica.

ScreenUpdating = False
IF Value <> 0 THEN
' Imprimir
END IF
ScreenUpdating = True

Salu2

"Juan Español" escribió en el mensaje
news:%
una ayudita porfa...

Tengo este pequeño código en un botón de la hoja L_PESOS

Private Sub IM_TK_Click()
Application.ScreenUpdating = False
Sheets("TK").Select
If Range("B10").Value = 0 Then Exit Sub

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("L_PESOS").Select
Application.ScreenUpdating = True
End Sub

Y al ejecutarlo me imprime la hoja aunque el valor de B10 sea cero

Y lo más curioso es que probando en la ventana de inmediato:
?Range("B10").Value respuesta: 0
If Range("B10").Value = 0 Then Debug,Print "el valor de B10 es cero"
Respuesta: el valor de B10 es cero

Por lo que deduzco que "Exit Sub" no funciona.

Y aquí la pregunta, ¿por qué podría ser?.

Saludos.

Preguntas similares

 

Busqueda sugerida :