condition in an if statement

white_flag · Mar 28, 2011

Hello

I like to add some condition in an if statement:

Code:

if (range("D4").value + 2* range("D5").value)/1000 <= 0.075 then
Range("G10").Formula = "=I4*(I8^4-I9^4)*I7*I5*D6"
else ..etc

without having errors

Ruddles · Mar 28, 2011

What conditions do you want to add and what's stopping you?

Perhaps this will help - I think you probably need to check out the bits in red:-

How to code IF statements

1) Simple IF with a single statement

Code:

   If condition Then x = 1

2) Simple IF with multiple statements

Code:

   If condition Then x = 1: a = ""

3) Block IF..THEN

Code:

   If condition Then
     x = 1
     a = "xxx"
   End If

4) Block IF..THEN..ELSE

Code:

   If condition Then
     x = 1
     a = "xxx"
   Else
     x = 2
     a = "yyy"
   End If

5) Block IF..THEN..ELSEIF

Code:

   If condition1 Then
     x = 1
     a = "xxx"
   ElseIf condition2 Then
     x = 2
     a = "yyy"
   End If

6) Block IF..THEN..ELSEIF..ELSE

Code:

[COLOR=red]  If condition1 Then[/COLOR]
[COLOR=red]    x = 1[/COLOR]
[COLOR=red]    a = "xxx"[/COLOR]
[COLOR=red]  ElseIf condition2 Then[/COLOR]
[COLOR=red]    x = 2[/COLOR]
[COLOR=red]    a = "yyy"[/COLOR]
[COLOR=red]  ElseIf condition3 Then[/COLOR]
[COLOR=red]    x = 3[/COLOR]
[COLOR=red]    a = "zzz"[/COLOR]
[COLOR=red]  Else[/COLOR]
[COLOR=red]    x = 4[/COLOR]
[COLOR=red]    a = "xyz"[/COLOR]
[COLOR=red]  End If[/COLOR]

How to code SELECT statements

1) Single test variable

Code:

[COLOR=red]  Select Case variable[/COLOR]
[COLOR=red]    Case 1, 3, 6 To 9[/COLOR]
[COLOR=red]      x = 1[/COLOR]
[COLOR=red]      a = "xxx"[/COLOR]
[COLOR=red]    Case Is <= 100[/COLOR]
[COLOR=red]      x = 2[/COLOR]
[COLOR=red]      a = "yyy"[/COLOR]
[COLOR=red]    Case Is <= 1000[/COLOR]
[COLOR=red]      x = 3[/COLOR]
[COLOR=red]      a = "zzz"[/COLOR]
[COLOR=red]    Case Else[/COLOR]
[COLOR=red]      x = 4[/COLOR]
[COLOR=red]      a = "xyz"[/COLOR]
[COLOR=red]  End Select[/COLOR]

2) Multiple test variables

Code:

[COLOR=red]  Select Case True[/COLOR]
[COLOR=red]    Case x < 100[/COLOR]
[COLOR=red]      a = "xxx"[/COLOR]
[COLOR=red]    Case a = "yyy", a = "zzz"[/COLOR]
[COLOR=red]      x = 2[/COLOR]
[COLOR=red]    Case Else[/COLOR]
[COLOR=red]      x = 4[/COLOR]
[COLOR=red]      a = "xyz"[/COLOR]
[COLOR=red]  End Select[/COLOR]

white_flag · Mar 28, 2011

but in my case the condition is an formula from excel and I do not know how to putted in VBA

Code:

if formula.excel <= 1500 then
Range("G10").Formula = "=1500*I4*(I8^4-I9^4)*I7*I5*D6"
else if formula.excel > 1500 then
Range("G10").Formula = "=pi()*I4*(I8^4-I9^4)*I7*I5*D6"
end if

Ruddles · Mar 28, 2011

What's "formula.excel"?

white_flag · Mar 28, 2011

formula will be:

(D4+2*D8)/1000 from the workbook

Ruddles · Mar 28, 2011

In VBA that would be:-

Code:

(Range("D4").Value+2*Range("D8").Value)/1000

condition in an if statement

white_flag

Active Member

Excel Facts

Ruddles

Well-known Member

white_flag

Active Member

Ruddles

Well-known Member

white_flag

Active Member

Ruddles

Well-known Member

Similar threads

Forum statistics

Share this page

condition in an if statement

white_flag

Active Member

Excel Facts

Ruddles

Well-known Member

white_flag

Active Member

Ruddles

Well-known Member

white_flag

Active Member

Ruddles

Well-known Member

Similar threads

Forum statistics

Share this page

We've detected that you are using an adblocker.

Which adblocker are you using?

Disable AdBlock

Disable AdBlock Plus

Disable uBlock Origin

Disable uBlock