Public Function Min3Variant( _
ByVal vValue1 As Variant _
, ByVal vValue2 As Variant _
, ByVal vValue3 As Variant _
, Optional ByVal vCompare As Variant _
) As Variant Min3Variant(23, 45, 56) = 23
Min3Variant(-12, 12, 4) = -12
Min3Variant(2%, 2#, 2!) = 2%
Min3Variant("SA", "RO", "EN") = "EN"
Min3Variant("SA", "ro", "en") = "SA"
Min3Variant("SA", "ro", "en", vbTextCompare) = "en"See also: Min3VariantVerify Subroutine
Min3Real Function
Min2Variant Function
Max3Variant FunctionvValue1: First of three values, the minimum of which will be returned. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.