Ver Mensaje Individual
  #5 (permalink)  
Antiguo 09/02/2008, 06:48
conraad
 
Fecha de Ingreso: febrero-2008
Mensajes: 1
Antigüedad: 16 años, 10 meses
Puntos: 0
Re: Excel: Cancelar un InputBox?

Creo que aquí va una opción:

While comodin = False
producto = (InputBox("Introduce el nombre del producto", "Producto", " "))
If producto = "" Then
Exit Sub
End If
If producto.Trim = "" Then
MsgBox("Debes introducir una descripción del producto", MsgBoxStyle.Critical)

....

Es decir, ponemos por defecto un valor " ", con lo cual si se le da a aceptar nunca le pasará un "", sino o bien la cadena introducida o bien " ", con un espacio.
Si se le da a Cancelar le pasará "" y saldremos del procedimiento.