sorting a range of cells in the same column by Address
i am trying (in a macro) to sort a range of cells, from variables declared as
objects, that are in the same row.
My problem is that as i run the macro, the program thinks that cell $L$56
is larger than cell $L$125. is there any way to get around this?
This is a portion of the code i am using.
'Sort to determine the stop coordinates
replacelist = 0
Set replace = Nothing
Do
If branchAddress1 branchAddress2 Then
replacelist = branchlist1
replacebranch = branchAddress1
branchlist1 = branchlist2
branchAddress1 = branchAddress2
branchlist2 = replacelist
branchAddress2 = replacebranch
Else
If branchAddress2 branchAddress3 Then
replacelist = branchlist2
replacebranch = branchAddress2
branchlist2 = branchlist3
branchAddress2 = branchAddress3
branchlist3 = replacelist
branchAddress3 = replacebranch
Else
If branchAddress3 branchAddress4 Then
replacelist = branchlist3
replacebranch = branchAddress3
branchlist3 = branchlist4
branchAddress3 = branchAddress4
branchlist4 = replacelist
branchAddress4 = replacebranch
Else
If branchAddress4 branchAddress5 Then
replacelist = branchlist4
replacebranch = branchAddress4
branchlist4 = branchlist5
branchAddress4 = branchAddress5
branchlist5 = replacelist
branchAddress5 = replacebranch
End If
End If
End If
End If
Loop Until branchAddress1 <= branchAddress2 And branchAddress2 <=
branchAddress3 And branchAddress3 <= branchAddress4 And branchAddress4 <=
branchAddress5
|