Macros modulares II: estructura condicional simple.

Es la que compara datos y en base a esa comparación determina sus secuencias y/o resultados.

Inicio

Comparación Si/NO

Fin comparación

Fin

Ejemplo:

Si el monto de las ventas es menor de $150.00 la tasa de comisión es del 3%. Si el monto es $150.00 o más, la tasa de comisión deberá ser 15%. Calcular y mostrar la comisión.

Solución:

Sub comision()
a = InputBox("ingrese valor")
If a <= 150 Then
    x = a * 0.15
Else
    x = a * 0.3
End If
MsgBox "su comisión es : " & x
End Sub

En este ejemplo capturamos el valor con a = InputBox("ingrese valor"), luego comparamos nuestro valor con If a <= 150 Then (se lee si a es menor e igual a 150 entonces) hace lo siguiente x = a * 0.15, si no (Else)  cumple la sentencia realiza la siguiente que es x = a * 0.3, después muestra el resultado con MsgBox.