Use select case statement : Select « Language Basics « VBA / Excel / Access / Word

VBA / Excel / Access / Word

1.	Access
2.	Application
3.	Data Type
4.	Data Type Functions
5.	Date Functions
6.	Excel
7.	File Path
8.	Forms
9.	Language Basics
10.	Math Functions
11.	Outlook
12.	PowerPoint
13.	String Functions
14.	Windows API
15.	Word
16.	XML

Java

Java Tutorial

Java Source Code / Java Documentation

Illustrator Tutorials

GIMP Tutorials

C# / C Sharp

C# / CSharp Tutorial

C# / CSharp Open Source

SQL Server / T-SQL Tutorial

Oracle PL / SQL

Oracle PL/SQL Tutorial

Flash / Flex / ActionScript

XML

XML Tutorial

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

VBA / Excel / Access / Word » Language Basics » Select

Use select case statement


 

Function Price(Product As String) As Variant

  Select Case Product

    Case "Apples"

      Price = 12.5

    Case "Oranges"

      Price = 15

    Case "Pears"

      Price = 18

    Case "Mangoes"

      Price = 25

    Case Else

      Price = CVErr(xlErrNA)

  End Select

End Function





Sub test()

    MsgBox CStr(Price("Oranges"))

End Sub

Related examples in the same category

1.	Use Integer as the switch value for Select Case Structure
2.	Use string text as the select case statement control value
3.	Specifying a Range of Values in a Case Clause by using the To keyword between the values of expressions
4.	Select Case Statements with comparison operator
5.	Specify a range in select case statement
6.	Specifying Multiple Expressions in a Case Clause: specify multiple conditions within a single Case clause by separating each condition with a comma
7.	Using Is with the Case Clause
8.	Select Case Else
9.	A nested Select Case example
10.	Three-level nested Select Case statement
11.	Convert number to String by using Select statement
12.	Choosing Actions with Select Case

www.java2java.com | Contact Us

All other trademarks are property of their respective owners.