Order).End(xlUp).Row End With If (Order.Value > Range(Column(Order) & CStr(LastRow))) Then xlSort = xlAscending Else xlSort = xlDescending End If Set dataRange = Range("A2:C" & Last
Select the range to be sorted (B4:B13in this example) and run the following code. The range will be sorted in ascending order. ⧭ Note: You can sort an array of numerical values too. Read More:Excel VBA Sort Array Alphabetically Method 2 – Sort Array Z-A (In Descending Order) in ...
Depending on whether the user clicks theA to ZorZ to Abutton on your form, sort tabs in ascending alphabetical order (selected by default) or descending alphabetical order; or close the form and do nothing in case ofCancel. This is done with the following VBA code, which you insert in th...
Select the range to be sorted (B4:B13in this example) and run the following code. The range will be sorted in ascending order. ⧭ Note: You can sort an array of numerical values too. Read More:Excel VBA Sort Array Alphabetically Method 2 – Sort Array Z-A (In Descending Order) in ...
Method 2 – Sort Array Z-A (In Descending Order) in Excel VBA The procedure is the same as that of ascending. In the code, use“Less than (<)”in place of the“Greater than (>)”. The complete VBA code will be: ⧭ VBA Code: ...