VBA/Excel/Access/Word/Language Basics/IIF

Choosing an Action Using IIf(expr, truepart, falsepart)

   <source lang="vb">

Sub iffDemo()

   Debug.Print IIf(1 < 10, "True. 1 is less than 10", "False. 1 is not less than 10")

End Sub

</source>
   
  

The Immediate If (IIf)

   <source lang="vb">

Function EvalSales(curSales As Currency) As String

  EvalSales = IIf(curSales >= 100000, "Great Job", "Keep Plugging")

End Function

</source>
   
  

Use IIF(conditional test, value for True, value for False)

   <source lang="vb">

Sub IIFSub()

   Dim strMessage As String
   Dim intNum As Integer
   
   intNum = 12
   
   strMessage = IIf(intNum > 10, "Number is greater than 10", "Number is less than 10")
   
   Debug.Print strMessage
   

End Sub

</source>
   
  

Use IIF to calculate value

   <source lang="vb">

Function Tax(ProfitBeforeTax As Double) As Double

 Tax = IIf(ProfitBeforeTax > 0, 0.3 * ProfitBeforeTax, 0)

End Function Sub test()

   MsgBox Tax(100)

End Sub

</source>