Alignment and format in listbox columns

Hi

I need to control the alignment and format of colums in a listbox that i
fill using array.

I need columns 1, 4,5,6 and 7 to be right aligned
I need columns 1, 4, 5 and 6 to be formatted like this #.###,##
i've done like this with column 1 in the code: MyArray(Rk, 0) =
Format(Selection.Value, "##,#0.00")

I need column 7 formatted as percentage.

See the attached picture.

Hoping for help.

Claus Persson