View Single Post
  #11   Report Post  
Posted to microsoft.public.excel.programming
Claus Busch Claus Busch is offline
external usenet poster
 
Posts: 3,872
Default Fast string comparison

Hi Robert,

Am Sun, 17 May 2015 01:53:18 -0700 schrieb Robert Crandal:

"AAA" = "aaa" ' True!


why do you want to compare the strings? Do you want to sort them?
If so and you have stored your strings in varOut (1D Array) then try:

For n = UBound(varOut) - 1 To LBound(varOut) Step -1
For i = LBound(varOut) To n
If varOut(i) varOut(i + 1) Then
strTemp = varOut(i)
varOut(i) = varOut(i + 1)
varOut(i + 1) = strTemp
End If
Next i
Next n

For i = LBound(varOut) To UBound(varOut)
Debug.Print varOut(i)
Next


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional