Use la instrucción If Then en Excel VBA para ejecutar líneas de código si se cumple una condición específica.

Si entonces declaración

Coloque un botón de comando en su hoja de trabajo y agregue las siguientes líneas de código:

Dim score As Integer, result As String
score = Range("A1").Value

If score >= 60 Then result = "pass"

Range("B1").Value = result

Explicación: si la puntuación es mayor o igual a 60, Excel VBA devuelve aprobado.

Resultado al hacer clic en el botón de comando en la hoja:

Nota: si la puntuación es inferior a 60, Excel VBA coloca el valor del resultado de la variable vacía en la celda B1.

Otra declaración

Coloque un botón de comando en su hoja de trabajo y agregue las siguientes líneas de código:

Dim score As Integer, result As String
score = Range("A1").Value

If score >= 60 Then
    result = "pass"
Else
    result = "fail"
End If

Range("B1").Value = result

Explicación: si la puntuación es mayor o igual a 60, Excel VBA devuelve aprobado, de lo contrario, los resultados de Excel VBA fallan.

Resultado al hacer clic en el botón de comando en la hoja:

Nota: solo si tiene una línea de código después de Then y ninguna instrucción Else, se permite colocar una línea de código directamente después de Then y omitir (dejar fuera) End If (primer ejemplo). De lo contrario, comience una nueva línea después de las palabras Then y Else y termine con End If (segundo ejemplo).

1/9 Completado! Obtenga más información sobre las declaraciones if then>
Siguiente capítulo: bucle