Public Function GroupVariantVector( _
ByRef rTo() As Variant _
, ByRef vFm() As Variant _
, Optional ByVal vCompare As Variant _
) As Boolean
Takes elements 1..UBound from vFm, and does a Group By Count * operation, putting the values in rTo(1, n) and the corresponding counts in rTo(2, n). This subroutine also performs a Sort Unique function.
Copyright 1996-1999 Entisoft Entisoft Tools is a trademark of Entisoft.