====== Microsoft Excel - Macros - Colors - Get Color ======

<code>
Function GetFillColor(Rng As range) As Long
  GetFillColor = Rng.Interior.ColorIndex
End Function
</code>

----

===== Usage =====

Get the Excel Color Number

<code>
=GetFillColor(Cell No)
</code>