<div>
Put them into two columns.<br />
Select all 40 cells.<br />
From the menu/ribbon, choose Sort, or use the keyboard - Alt-D, Alt-S<br />
Options: no header, column (choose the column containing the values)<br />

</div>


Put them into two columns.
Select all 40 cells.
From the menu/ribbon, choose Sort, or use the keyboard - Alt-D, Alt-S
Options: no header, column (choose the column containing the values)


<div>
I need a VBA solution. Something like the attached code, but with a better performance<br />

<pre><code id="code-783912">Public Function SortArray(ByRef TheArray As Variant)
Sorted = False
Do While Not Sorted
    Sorted = True
For X = 0 To UBound(TheArray) - 1
    If TheArray(X) &gt; TheArray(X + 1) Then
        Temp = TheArray(X + 1)
        TheArray(X + 1) = TheArray(X)
        TheArray(X) = Temp
        Sorted = False
    End If
Next X
Loop
End Function
</code></pre>
</div>


I need a VBA solution. Something like the attached code, but with a better performance


Public Function SortArray(ByRef TheArray As Variant)
Sorted = False
Do While Not Sorted
    Sorted = True
For X = 0 To UBound(TheArray) - 1
    If TheArray(X) > TheArray(X + 1) Then
        Temp = TheArray(X + 1)
        TheArray(X + 1) = TheArray(X)
        TheArray(X) = Temp
        Sorted = False
    End If
Next X
Loop
End Function


<div>
<div class="content wysiwyg-content">
Hi X-perts,<br />
<br />
I have two arrays:<br />
<br />
names(1 to 20) ---- a string array<br />
values(1 to 20) ----- a numerical array (double)<br />
<br />
Both arrays are linked, i.e. i-th element of names corresponds to i-th element of values.<br />
<br />
I need to sort both arrays on values, i.e. after sorting the 2nd array (values) will have all decrementing values and its i-th element will correspond to the same name as before sorting (i-th element of names) <br />
<br />
Please suggest the most elegant way of doing that.<br />
<br />
Thanks
</div>
</div>


Hi X-perts,

I have two arrays:

names(1 to 20) ---- a string array
values(1 to 20) ----- a numerical array (double)

Both arrays are linked, i.e. i-th element of names corresponds to i-th element of values.

I need to sort both arrays on values, i.e. after sorting the 2nd array (values) will have all decrementing values and its i-th element will correspond to the same name as before sorting (i-th element of names) 

Please suggest the most elegant way of doing that.

Thanks

VBA Excel: sorting arrays

Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.

Visual Basic Classic

VBScript (Visual Basic Scripting Edition) is an interpreted scripting language developed by Microsoft that is modeled on Visual Basic, but with some important differences. VBScript is commonly used for automating administrative and other tasks in Windows operating systems (by means of the Windows Script Host) and for server-side scripting in ASP web applications. It is also used for client-side scripting in Internet Explorer, specifically in intranet web applications.