Public Function IsBetween( _
ByVal vCheck As Variant _
, ByVal vLow As Variant _
, ByVal vHigh As Variant _
, Optional ByVal vCompare As Variant _
) As Variant IsBetween(5, 6.0, 7) = False
IsBetween(5, 4.5, 7) = True
IsBetween("S", "A", "Z", vbBinaryCompare) = True
IsBetween("s", "A", "Z", vbBinaryCompare) = False
IsBetween("s", "A", "Z", vbTextCompare) = TrueSee also: RangeComp Function
IsWithinPlusOrMinusOf Function
FixUpVariantToRange SubroutinevCheck: The value which is checked to see if it falls within the inclusive range. Function returns Null if vCheck is Null. vLow: The lower bound of the range which vCheck must be within for the function to return True. Function returns Null if vLow is Null.
vHigh: The upper bound of the range which vCheck must be within for the function to return True. Function returns Null if vHigh is Null.
vCompare: Specifies the sort order/collating sequence used when comparing string values. vCompare defaults to Binary comparisons if it is missing or Null or cannot be fixed up to a number.
If the arguments vCheck, vLow, and vHigh are non-Null, then this function uses the CompareLikeDataType function to determine if vCheck is within the range.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.