Problema con un inputbox para excel

Podrías usar:
If x = "" Then Exit Sub


Saludos

Alejandro Villarreal




"Jose" wrote:

Tengo una macro en excel que hace que salgan varios inputbox seguidos, pero
lo que quiero es que al pulsar el boton cancelar de alguna inpubox se pare la
macro y no que ponga un 0 y sigan saliendo las demás inputbox.


Sería algo así, pero lo del boton vbCancel solo vale para msgbox, en
inputbox no me funciona. ¿Solución?

x = Val(InputBox("Valor de x", "INTRODUZCA x"))
ActiveSheet.Range("H5").Value = x / 100

If x = vbCancel Then

Exit Sub

End If

hola Jose,

Se me ocurren dos opciones,

Una crear en la cadena de texto una vía de escape, Por ejemplo: que el
mensaje que muestras en el inputbox indiques,
escribe 0 para terminar y luego compruebas la cadena devuelta.

O crear tu propio inputbox

Creas un formulario colocas un control label, un textbox, dos botones, a uno
le pones cancelar y a otro aceptar.
Y en función de cual presiones dices que haces.

Un saludo,
Juan

"Jose" escribió

Tengo una macro en excel que hace que salgan varios inputbox seguidos,
pero
lo que quiero es que al pulsar el boton cancelar de alguna inpubox se pare
la
macro y no que ponga un 0 y sigan saliendo las demás inputbox.


Sería algo así, pero lo del boton vbCancel solo vale para msgbox, en
inputbox no me funciona. ¿Solución?

x = Val(InputBox("Valor de x", "INTRODUZCA x"))
ActiveSheet.Range("H5").Value = x / 100

If x = vbCancel Then

Exit Sub

End If

Gracias por las respuestas,

Alex la solución que me das ya la había probado pero me daba error...

A lo mejor lo que me dice Juan del control label podría valer pero no
controlo tanto de ese tema... Si no encuentro solución lo intentaré por ahí.

hola, Jose !

Tengo una macro en excel que hace que salgan varios inputbox seguidos
pero lo que quiero es que al pulsar el boton cancelar de alguna inpubox se pare la macro
y no que ponga un 0 y sigan saliendo las demas inputbox.
Seria algo asi, pero lo del boton vbCancel solo vale para msgbox, en inputbox no me funciona. Solucion?

x = Val(InputBox("Valor de x", "INTRODUZCA x"))
ActiveSheet.Range("H5").Value = x / 100
If x = vbCancel Then
Exit Sub
End If

si ya estas definiendo/convirtiendo a valor el resultado del inputbox... -> x = Val(...
- prueba una salida comparando si el valor debuelto es 0 (cero)...

if x = 0 then exit sub

saludos,
hector.

"Héctor Miguel" wrote:

hola, Jose !

> Tengo una macro en excel que hace que salgan varios inputbox seguidos
> pero lo que quiero es que al pulsar el boton cancelar de alguna inpubox se pare la macro
> y no que ponga un 0 y sigan saliendo las demas inputbox.
> Seria algo asi, pero lo del boton vbCancel solo vale para msgbox, en inputbox no me funciona. Solucion?
>
> x = Val(InputBox("Valor de x", "INTRODUZCA x"))
> ActiveSheet.Range("H5").Value = x / 100
> If x = vbCancel Then
> Exit Sub
> End If

si ya estas definiendo/convirtiendo a valor el resultado del inputbox... -> x = Val(...
- prueba una salida comparando si el valor debuelto es 0 (cero)...

if x = 0 then exit sub

saludos,
hector.

Eso ya lo había pensado, pero el caso es que a veces tengo que poner 0 y no
quiero salir de la macro.

Gracias.