OR statement VB

[Guest]

Hi,

this must be very easy, but I cannot figure it out the right way:

I want an If statement that checks whether one or more cells contain
specific values. Therefore I tried something like:

if or(Sheets(1).Range("K36")>16%, Sheets(1).Range("K37")>16%) then
BLABLABLA
etc.

However, the OR doesn't work like this, but I cannot figure out how it
should be done!

Thanks for the help!

Max

 

[Guest]

Max,

In VB

Sub mersible()
If Range("A1").Value = 1 Or Range("A2").Value = 2 Then
MsgBox ("Validated")
Else
MsgBox ("Not Validated")
End If
End Sub

OIr as a worksheet formula:-

=IF(OR(A1=1,A2=2),"Its true","Its not true")

Mike

 

[Guest]

Hi Max

Standard syntax for using If Then statements is as follows

If ......... Then
dosomething
Else
do something else
End If

Or

If ......... Then
Do something
ElseIf ........
Do something Else
End If

Depending on how many logical statements you have to check - you could also
use the Selectt Case statement

HTH

 

[Guest]

Hi Mike,

thanks, I know about the if-statements. But I want to use OR statements, not
only here, but in other parts as well and I thought they might be available
in VB as well. Just as you can use them in excel, returning a Boolean value.
Can you help me with this one?

Thanks, Max

 

[Guest]

Max,

You can't use OR without IF and I gave you the VB version.

Sub mersible()
If Range("A1").Value = 1 Or Range("A2").Value = 2 Then
MsgBox ("Validated")
Else
MsgBox ("Not Validated")
End If
End Sub



Mike

 

[Guest]

Thanks!

Max,

In VB

Sub mersible()
If Range("A1").Value = 1 Or Range("A2").Value = 2 Then
MsgBox ("Validated")
Else
MsgBox ("Not Validated")
End If
End Sub

OIr as a worksheet formula:-

=IF(OR(A1=1,A2=2),"Its true","Its not true")

Mike

 

[Bob Phillips]

Max,

You can't use OR without IF and I gave you the VB version.

val1 = 17
val2 = 2

MsgBox val1 > 20 Or val2 > 0

 

[Guest]

OK, I understand and the if statement already works,
Thank you Mike!

Max

 

[Peter T]

Max,

did you see Bob's example without use of 'If'

another one -

Dim bValid as Boolean
bValid = Range("A1").Value = 1 Or Range("A2").Value = 2

Regards,
Peter T

 

[Guest]

if or(Sheets(1).Range("K36")>16%, Sheets(1).Range("K37")>16%) then
MsgBox val1 > 20 Or val2 > 0 then BLABLABLA without IF please?

Mike

 

[Bob Phillips]

MsgBox val1 > 20 Or val2 > 0 then BLABLABLA without IF please?

val3 = -(val1 > 20 Or val2 > 0) * 20

 

[Guest]

That isn't providing a boolean True/False option (then

Mike

 

[Guest]

before I'm corrected 1*20=20

That isn't providing a boolean True/False option (then


Mike

 

[Bob Phillips]

It was just an example, you can do more, but you're adamant, so I will shut
up.

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

 

[Guest]

Cheers guys, I've seen them all and used quite all of it!
Max