Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Public Function FindAssets(pstrCust as String, _
lngClientType as Long, dblAssets as Double) as Variant
Select Case pstrCust
Case "Carbo", "CWR"
If lngClientType = 2 Then
FindAssets = Null
Else
FindAssets = dblAssets
End If
Case Else
FindAssets = dblAssets
End Select
End Function