If statement ladder : IF « Language Basics « VBA / Excel / Access / Word

If statement ladder


Function Price(Product As String) As Variant
  If Product = "Apples" Then
    Price = 12.5
  ElseIf Product = "Oranges" Then
    Price = 15
  ElseIf Product = "Pears" Then
    Price = 18
  ElseIf Product = "Mangoes" Then
    Price = 25
    Price = CVErr(xlErrNA)
  End If
End Function

Sub test()
    MsgBox CStr(Price("Oranges"))
End Sub


Related examples in the same category

1.A simple decision-making structure in a subroutine
2.Within an If structure, you can have an alternative path by using an Else statement.
3.Use and in if statement
4.Block If Statements
5.One-Line If Statements
6.If... Then... ElseIf... Else Statements
7.An If... Then... ElseIf Statement without an Else Clause
8.Combine several If structures using ElseIf.
9.Using the If...Then Statement
10.Write If Then statement in one line
11.Using the Multi-Line If...Then Statement
12.Decisions Based on More Than One Condition: Using the If..Then...AND Conditional Statement
13.Using If...Then...Else Conditional Statement
14.If...Then...ElseIf Statement
15.Nest if statement in a Do Loop
16.Nest an if statement with Do While
17.If/Then/Else: guess a number