Utilice la sentencia si entonces en Excel VBA para ejecutar líneas de código si se cumple una condición específica.

Si Entonces Declaración

Coloque un enlace: / VBA crear a un macro-#-botón de comando [botón de comando] en su hoja de trabajo y añadir 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, vuelve Excel VBA pasan.

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

Excel VBA If Then Statement

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

Else

Coloque un enlace: / VBA crear a un macro-#-botón de comando [botón de comando] en su hoja de trabajo y añadir 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, vuelve Excel VBA pasan, de lo contrario retorna Excel VBA fallan.

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

Excel VBA Else Statement

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