It looks like you might want to try the .Color property instead of .ColorIndex.

"Mike H." wrote:

DataArray(Z, 2) = Cells(X, 1).Interior.ColorIndex
Cells(X, 1).Interior.ColorIndex = DataArray(Z, 2)

I go through a loop and if I execute both these lines on a cell, the
original cell color may be a light shade of purpose but after I set the color
to the same color, it is now a shade of gray! Why?