' equpix color pallete
Dim equpix15 As Array
equpix15 = [5389390, 2763322, 4084802, 8672348, 3694716, 6060630, 1052708, 11697750, 13913682, 5613716, 8432704, 15501899, 9162938, 16764008, 16775360]

Dim color As Integer
For Each color In equpix15
  Print color
Next