Public Function SortStringSegments( _
ByVal vValue As Variant _
, ByVal vSegmentLength As Variant _
, Optional ByVal vCompare As Variant _
) As Variant SortStringSegments("050102060403", 2, vbBinaryCompare) = "010203040506"
SortStringSegments("Wa Or nv Ca az ", 3, vbBinaryCompare) = "Ca Or Wa az nv "
SortStringSegments("Wa Or nv Ca az ", 3, vbTextCompare) = "az Ca nv Or Wa "See also: SearchSortedStringSegments Function
ShuffleStringSegments FunctionvValue: String containing the equal-length segments which are to be sorted. Function returns Null if vValue is Null or cannot be fixed up to a String. vSegmentLength: The length of each sub-string segment within string vValue. Function returns Null if vSegmentLength is Null or cannot be fixed up to a number.
Function returns Null if the segment length is < 1 (less than one).
vCompare: Specifies the sort order/collating sequence. vCompare defaults to Binary comparisons if it is missing or Null or cannot be fixed up to a number.
Algorithm: Function uses Shell Sort algorithm.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.