09/02/2008, 06:48
|
| | 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. |