Excel VBA Si Entonces Declaración
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:
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:
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).