Modificar condicional "if" por "or"

Les comento.

La siguiente validación necesita de la información de las columnas B C D y E para realizarse

If ActiveSheet.Range ("B" & dato).Value = "" Then
sMsg = sMsg & "1 "
End if
If ActiveSheet.Range ("C" & dato).Value = "" Then
sMsg = sMsg & "2 "
End if

If ActiveSheet.Range ("D" & dato).Value = "" Then
sMsg = sMsg & "3 "
End if
If ActiveSheet.Range ("E" & dato).Value = "" Then
sMsg = sMsg & "4 "
End if

Lo que necesito es que halla al menos un dato en la columna B o C o ambas para que se cumpla la validación. En la columna D y E que siga estricta la escritura de información.

1 Respuesta

Respuesta
1

No he entendido muy bien que necesitas, pero si creo que la solución pasa por anidar los condicionales utilizando ELSE o utilizar AND

If ActiveSheet.Range ("B" & dato).Value = ""  AND ActiveSheet.Range ("C" & dato).Value = "" Then
'Instrucciones para B y C sin datos
End If

If ActiveSheet.Range ("B" & dato).Value = "" Then
If ActiveSheet.Range ("C" & dato).Value = "" Then
'Instrucciones para B y C sin datos

Else
' Instrucciones para B y C o solo uno de los con datos

End if

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas