Excel: Get cell color

Question

1) How do I get the color of a cell using an Excel Macro? I couldn\'t get this function work:

Sub BGCol(MRow As Integer, MCol As Integer)  
bgColor = Cells(M         


        

Answer 1

You should use a Function:

Function BGCol(MRow As Integer, MCol As Integer)  As Integer
   BGCol = Cells(MRow, MCol).Interior.ColorIndex  
End Function