Excal Listbox Bubble-sort running slow on large amount of Data

Question

I use the following code to sort the data in a multicolumn Listbox. It sorts based on the numeric data in the 5th column. It works fine but is really slow when there is a la