Use ElseIf in a function : Function « Language Basics « 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

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

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

Use ElseIf in a function

 

Public Function LoanCriteria(loanAmt As Single, numPayments As Integer, _

         moPayment As Integer, totInterest As Single) As Boolean

    If Abs(moPayment) > 400 Then

        LoanCriteria = False

    ElseIf Abs(totInterest) > (0.1 * loanAmt) Then

         LoanCriteria = False

    ElseIf numPayments > 48 Then

        LoanCriteria = False

    Else

        LoanCriteria = True

    End If

End Function

Related examples in the same category

1.	Writing VBA Function Procedures
2.	A function returns a value to whomever called it. We can recast the previous sub into a function as follows:
3.	Call user-defined function in MsgBox
4.	Executing a Function Procedure from a Subroutine
5.	A function returns a value to whomever called it.
6.	One of simplest possible custom functions
7.	function takes two arguments's length and width's and calculates the total area by multiplying them together
8.	Convert Fahrenheit To Celsius
9.	Select Case in a function
10.	A function with one argument

java2s.com |

| Contact Us | Privacy Policy

All other trademarks are property of their respective owners.