[Ошибки] Перевернутое значение цвета в _ColorGetRGB

_ColorGetRGB

#include <Excel.au3>
#include <Array.au3>
#include <Color.au3>

Dim $a[1],$t[5], $b[5][5]
$oExcel =_ExcelBookAttach ('Коор.xls','filename')
$t[0]=$oExcel.ActiveSheet.Range('B2').Interior.Color
$t[1]=$oExcel.ActiveSheet.Range('C2').interior.Color
$t[2]=$oExcel.ActiveSheet.Range('D2').interior.Color
$t[3]=$oExcel.ActiveSheet.Range('D4').interior.Color
$t[4]=$oExcel.ActiveSheet.Range('D5').interior.Color
for $i=0 to UBound($t)-1
	$b1= _ColorGetRGB ($t[$i])
	for $k=0 to UBound($b1)-1
		$b[$i][$k]=$b1[$k]
	Next
	$b[$i][3]=$t[$i]
Next
$b[0][4]='красный'
$b[1][4]='нет заливки'
$b[2][4]='нет заливки'
$b[3][4]='зелёный'
$b[4][4]='синий'
_ArrayDisplay($b)

BitOR(BitAND($Color, 0x00FF00), BitShift(BitAND($Color, 0x0000FF), -16), BitShift(BitAND($Color, 0xFF0000), 16))

For $i = 0 To UBound($t) - 1
	$b1 = _ColorGetRGB($t[$i])
	
	For $k = 0 To UBound($b1) - 1
		$b[$i][$k] = $b1[UBound($b1) - 1 - $k]
	Next
	
	$b[$i][3] = $t[$i]
Next